R help - Jan 2013 - How to cut the time format short

Hello all,

I have a time format looks like

31JAN2002:00:00:00.000

How could I cut it to

31JAN2002

?

I tried with format() but not work.

Thanks,

Rebecca

----------------------------------------------------------------------
This message, and any attachments, is for the intended r...{{dropped:5}}

> I have a time format looks like
> 31JAN2002:00:00:00.000
> How could I cut it to
> 31JAN2002
You have several options depending on what form the data are in.

Assuming it is character data, you could use substr:

substr("31JAN2002:00:00:00.000", 1, 9)

or gsub:

gsub("(.{9}).+", "\\1", "31JAN2002:00:00:00.000")

or you could convert to date and reprint:
d <- as.Date("31JAN2002:00:00:00.000", format="%d%b%Y")
format(d, "%d%b%Y") 
	#albeit with lowecase month

All of those should work on vectors.
Some will work on factors but to be safe, wrap the factors in as.character() 

S Ellison

*******************************************************************
This email and any attachments are confidential. Any use...{{dropped:8}}

Hello Ellison,

Thanks very much!

I use the substr() and it works!

Have a great day!

Cheers,

Rebecca

-----Original Message-----
From: S Ellison [mailto:S.Ellison at LGCGroup.com] 
Sent: Wednesday, January 16, 2013 1:35 PM
To: Yuan, Rebecca; R help
Subject: RE: How to cut the time format short

 
> I have a time format looks like
> 31JAN2002:00:00:00.000
> How could I cut it to
> 31JAN2002
You have several options depending on what form the data are in.

Assuming it is character data, you could use substr:

substr("31JAN2002:00:00:00.000", 1, 9)

or gsub:

gsub("(.{9}).+", "\\1", "31JAN2002:00:00:00.000")

or you could convert to date and reprint:
d <- as.Date("31JAN2002:00:00:00.000", format="%d%b%Y")
format(d, "%d%b%Y")
	#albeit with lowecase month

All of those should work on vectors.
Some will work on factors but to be safe, wrap the factors in as.character() 

S Ellison

*******************************************************************
This email and any attachments are confidential. Any use...{{dropped:7}}