Re: [R] Why is conversion not working?

From: Law, Jason <jason.law_at_bes.ci.portland.or.us>
Date: Mon, 17 Dec 2007 17:13:47 -0800


Without actually running the code, one problem seems to be that the line if(database$year[i]>90)
is comparing a character vector to 90 and not the numbers that you are expecting.

You could try this instead:
database$year <- as.numeric(database$year) ifelse(database$year > 90, database$year + 1900, database$year + 2000)

Jason Law
Statistician
City of Portland, Bureau of Environmental Services Water Pollution Control Laboratory
6543 N Burlington Avenue
Portland, OR 97203 -5452
jlaw_at_bes.ci.portland.or.us

-----Original Message-----
From: r-help-bounces_at_r-project.org
[mailto:r-help-bounces_at_r-project.org]On Behalf Of Jonas Malmros Sent: Monday, December 17, 2007 4:53 PM
To: r-help_at_r-project.org
Subject: [R] Why is conversion not working?

I have a data frame, where two last columns - "month" and "year" - are character vectors. The "year" vector is made of two numbers (i.e. "97" for 1997, "07" for 2007, etc)
What I want to do is to create a variable "Year" that is mode numeric and where each record is a four-figure number (1997, 2007,...) I have about 40000 rows in the dataframe, the observations are for 10 years (so there are multiple rows for each year). I tried the following, but the program runs and runs, and if I abort it all the years in "Year" are 1997:

for(i in 1:dim(database)[1]){

    if(database$year[i]>90) {

           database$Year[i] <- as.numeric(database$year[i])+1900 } else {
           database$Year[i] <- as.numeric(database$year[i])+2000
    }
}

Thanks in advance for explanations.

Regards,
JM

-- 
Jonas Malmros
Stockholm University
Stockholm, Sweden


______________________________________________
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.
Received on Tue 18 Dec 2007 - 01:18:29 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Tue 18 Dec 2007 - 02:30:19 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.