eps_year_xts["2020::"]
[,1]
2020-04-01 99.23
2020-07-01 98.22
2020-10-01 96.45
2021-01-01 119.73
2021-04-01 139.51
2021-07-01 146.75
2021-10-01 154.78
eps_year_xts["2020::"]
[,1]
$ seq -f %03g 1 10
ループ loop
for i in `seq -f %03g 1 90`; do wget https://blog-imgs-77-origin.fc2.com/u/r/u/urutoraerogazou/matsushima-kaede-166-$i.jpg ; done
for i in `seq 414 453`; do wget https://blog-imgs-76-origin.fc2.com/d/e/n/densetsuav/1543tachibanarikopin-$i.jpg ; done
二重ループ double loop サンプル
for(i in seq(1,47,1)){ colnames(mdf)[i] <- (paste(sprintf("%02d",i),colnames(mdf)[i],sep=""))}
sprintf("%.2f",100.0111)
[1] "100.01"
sprintf("%.3f",100.0111)
[1] "100.011"
sprintf("%.5f",100.0111)
[1] "100.01110"
sprintf("%.6f",100.0111)
[1] "100.011100"
awk '{$3=sprintf("%02d", $3);
find . -print | awk -F\. '{print $2}' | grep k | awk -F\/ '{print $3"-"$2}' | awk '{split($0,a,"-"); print "cp \.\/"a[4]"\/"a[1]"-"a[2]"-"a[3]".jpg ~\/tmpimage\/kaede\/jjgirls.com\/"a[1]a[2]a[4]"-"a[3]".jpg"}' > kaedecp.txt
last(tmp.predict,3)
create the entry for "2021-01-01". first to create single row matrix and convert to the xts.
as.xts(matrix(c(as.vector(apply.monthly(SP5["2021-01"],mean)),3395,3180),nrow=1),as.Date("2021-01-01"))[,-5]
run append.
append(tmp.predict,as.xts(matrix(c(as.vector(apply.monthly(SP5["2021-01"],mean)),3395,3180),nrow=1),as.Date("2021-01-01"))[,-5]) %>% last(.,6)
> eps_year_xts["2020::"]
[,1]