[R] time extraction and normalization

[Simon Knapp]

Whoops... tried to get all descriptive with the argument names before
I posted but after I tested. Try this

toDaySecond <- function(date.string, format.string='%d%b%Y:%T', tz='') {
    d <- as.POSIXct(date.string, format=format.string, tz=tz)
    sum(mapply(function(f, l) as.numeric(format(d, format=f)) * l,
c('%H', '%M', '%S'), c(3600, 60, 1)))
}


On Tue, Oct 16, 2012 at 11:22 PM, arun <smartpink111 at yahoo.com> wrote:
> Hi Simon,
> I tried your code, but I am getting some error message:
> toDaySecond('04MAY2011:08:19:00')
> #Error in as.POSIXct(d, format = format.string, tz = tz) :
>   #object 'd' not found
>
> A.K.
>
>
>
>
> ----- Original Message -----
> From: Simon Knapp <sleepingwell at gmail.com>
> To: Jeff Newmiller <jdnewmil at dcn.davis.ca.us>
> Cc: r-help at r-project.org; york8866 <yu_york at hotmail.com>
> Sent: Tuesday, October 16, 2012 1:32 AM
> Subject: Re: [R] time extraction and normalization
>
> toDaySecond <- function(date.string, format.string='%d%b%Y:%T', tz='') {
>     d <- as.POSIXct(d, format=format.string, tz=tz)
>     sum(mapply(function(f, l) as.numeric(format(d, format=f)) * l,
> c('%H', '%M', '%S'), c(3600, 60, 1)))
> }
>
> toDaySecond('04MAY2011:08:19:00')
>
> Will calculate the second of the day. divide by 3600 to convert to hours.
>
>
> On Tue, Oct 16, 2012 at 4:21 PM, Jeff Newmiller
> <jdnewmil at dcn.davis.ca.us> wrote:
>> There are multiple ways. For lack of your example, I would suggest multiplying by 24.
>>
>> Please post the previous context of the thread if you must post from Nabble.
>> ---------------------------------------------------------------------------
>> Jeff Newmiller                        The     .....       .....  Go Live...
>> DCN:<jdnewmil at dcn.davis.ca.us>        Basics: ##.#.       ##.#.  Live Go...
>>                                       Live:   OO#.. Dead: OO#..  Playing
>> Research Engineer (Solar/Batteries            O.O#.       #.O#.  with
>> /Software/Embedded Controllers)               .OO#.       .OO#.  rocks...1k
>> ---------------------------------------------------------------------------
>> Sent from my phone. Please excuse my brevity.
>>
>> york8866 <yu_york at hotmail.com> wrote:
>>
>>>Thanks,
>>>
>>>The code gives the numbers in "days", how can I adjust the code to
>>>directly
>>>get the numbers in "hours"?
>>>
>>>I tried units but it did not work.
>>>
>>>Thanks1
>>>
>>>
>>>
>>>--
>>>View this message in context:
>>>http://r.789695.n4.nabble.com/time-extraction-and-normalization-tp4646275p4646298.html
>>>Sent from the R help mailing list archive at Nabble.com.
>>>
>>>______________________________________________
>>>R-help at r-project.org mailing list
>>>https://stat.ethz.ch/mailman/listinfo/r-help
>>>PLEASE do read the posting guide
>>>http://www.R-project.org/posting-guide.html
>>>and provide commented, minimal, self-contained, reproducible code.
>>
>> ______________________________________________
>> R-help at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>