Thanks so much, A.K.
Problem well solved.
Atem.
On Sunday, November 17, 2013 1:28 AM, arun wrote:
Hi,
Try:
dat1 <-
read.csv("precipitationRglimclim.csv",header=TRUE,stringsAsFactors=FALSE,sep="\t")
library(reshape2)
dat2M <- melt(dat1,id.var=c("year","month","day"))
dat2M1 <- dat2M[with(
Hi,
Try:
dat1 <-
read.csv("precipitationRglimclim.csv",header=TRUE,stringsAsFactors=FALSE,sep="\t")
library(reshape2)
dat2M <- melt(dat1,id.var=c("year","month","day"))
dat2M1 <- dat2M[with(dat2M,order(year,month,day,variable)),]
dim(dat2M1)
#[1] 1972320 5
row.names(dat2M1) <- 1:nrow(dat2M
2 matches
Mail list logo