Displaying 1 result from an estimated 1 matches for "tannu".
Did you mean:
tanu
2013 Mar 14
0
reshape
...discharge: num? 6.75 7.6 5.58 5.02 4.8 ...
library(reshape2)
dat2<- do.call(rbind,lapply(split(dat1,list(dat1$st,dat1$year)),function(x) {x$day<-seq_along(x$day);x}))
row.names(dat2)<-1:nrow(dat2)
?str(dat2)
#'data.frame':??? 506953 obs. of? 5 variables:
# $ st?????? : chr? "TANNU" "TANNU" "TANNU" "TANNU" ...
# $ year???? : int? 1935 1935 1935 1935 1935 1935 1935 1935 1935 1935 ...
# $ month??? : int? 1 1 1 1 1 1 1 1 1 1 ...
# $ day????? : int? 1 2 3 4 5 6 7 8 9 10 ...
# $ discharge: num? 8.06 7.65 7.3 7.3 6.95 6.95 6.6 6.25 5.9 5.61 ...
re...