Thanks all! That did it.

On Thu, Jul 15, 2010 at 11:07 AM, Nikhil Kaza <nikhil.list@gmail.com> wrote:

> Building on Erik's solution and because it would easier to do date
> arithmetic..
>
> d1 <- as.character(date)
> d1 <- ifelse(nchar(d1)<4, paste(0,d1,sep=""),d1)
> d2 <- as.Date(date, "%m%d")
>
>
> On Jul 15, 2010, at 1:21 PM, btc1 wrote:
>
>
>> Hello, I have a vector, "dates", as a series of 3 digit elements, i.e. >
>> date
>>  [1] 528 528 528 528 528 528 528 528 528 528 528 528 708 708 708 708 708
>> 708
>> [19] 708 708 708 708 529 529 529 529 529 529 529 529 529 529 529 529 529
>> 529
>> [37] 529 624
>>
>> I need to convert them into julian, but have to insert a "/" or "-" after
>> the first number within each element of the vector (5/28 5/28 etc). Found
>> plenty functions to replace by a pattern but not to cut by a certain
>> number
>> of digits with an element. Alternately, if I could run all the elements
>> into
>> one long vector and then cut every one then two digits, that would work as
>> well.
>>
>> Thanks.
>> --
>> View this message in context:
>> http://r.789695.n4.nabble.com/Cut-a-within-elements-by-length-not-value-of-vectors-tp2290440p2290440.html
>> Sent from the R help mailing list archive at Nabble.com.
>>
>> ______________________________________________
>> R-help@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.
>>
>
>

	[[alternative HTML version deleted]]

