view pYtime/xytime.R @ 1:72fbbff22c5c draft default tip

Uploaded

#change all central Ys to xY and do nothing else

inputtoim<-read.csv("needspy.csv",header = FALSE,sep = ",",stringsAsFactors = FALSE)

YsToim<-rep("xY",times=nrow(inputtoim)-1)
YsToim<-c("0",YsToim)

outputtoim<-inputtoim

outputtoim[,11]<-YsToim

head(inputtoim)
head(outputtoim)

write.table(x=outputtoim,file = "haspy.csv",row.names = FALSE,col.names = FALSE,sep = ",")