setwd("")
library(chron)
data.JD=read.csv("merge.csv",header=T)
data.JD=as.matrix(data.JD)
as.character(data.JD)
a=ncol(data.JD)
b=nrow(data.JD)
for(i in 5:a){
  for(j in 1:b)
    data.JD[j,i]=julian(as.numeric(strsplit(data.JD[j,i],'/')[[1]][1]),as.numeric(strsplit(data.JD[j,i],'/')[[1]][2]),as.numeric(data.JD[j,i]),origin=c( 1, 1, as.numeric(data.JD[j,1])))
}
write.csv(data.JD,file = ".//JulianD.csv",row.names = F)

写出数据的结果全是NA值，不知道问题出在哪里，求大神指导！感谢。