library(magrittr) # %>% pipe
txt =
c("20220404,板橋,38,40,0.1,4288,120,20220404,三重,25,60,0.2,4286,125",
"20220404,板橋,38,40,0.1,4288,120,20220404,三重,25,60,0.2,4286,125",
"20220404,板橋,38,40,0.1,4288,120,20220404,三重,25,60,0.2,4286,125",
"20220404,板橋,38,40,0.1,4288,120,20220404,三重,25,60,0.2,4286,125")
strsplit(txt, ",") %>%
do.call("c", .) %>%
matrix(byrow = T, ncol = 7)
# [,1] [,2] [,3] [,4] [,5] [,6] [,7]
# [1,] "20220404" "板橋" "38" "40" "0.1" "4288" "120"
# [2,] "20220404" "三重" "25" "60" "0.2" "4286" "125"
# [3,] "20220404" "板橋" "38" "40" "0.1" "4288" "120"
# [4,] "20220404" "三重" "25" "60" "0.2" "4286" "125"
# [5,] "20220404" "板橋" "38" "40" "0.1" "4288" "120"
# [6,] "20220404" "三重" "25" "60" "0.2" "4286" "125"
# [7,] "20220404" "板橋" "38" "40" "0.1" "4288" "120"
# [8,] "20220404" "三重" "25" "60" "0.2" "4286" "125"
bGlicmFyeShtYWdyaXR0cikgIyAlPiUgcGlwZQp0eHQgPSAKICBjKCIyMDIyMDQwNCzmnb/mqYssMzgsNDAsMC4xLDQyODgsMTIwLDIwMjIwNDA0LOS4iemHjSwyNSw2MCwwLjIsNDI4NiwxMjUiLAogICAgIjIwMjIwNDA0LOadv+apiywzOCw0MCwwLjEsNDI4OCwxMjAsMjAyMjA0MDQs5LiJ6YeNLDI1LDYwLDAuMiw0Mjg2LDEyNSIsCiAgICAiMjAyMjA0MDQs5p2/5qmLLDM4LDQwLDAuMSw0Mjg4LDEyMCwyMDIyMDQwNCzkuInph40sMjUsNjAsMC4yLDQyODYsMTI1IiwKICAgICIyMDIyMDQwNCzmnb/mqYssMzgsNDAsMC4xLDQyODgsMTIwLDIwMjIwNDA0LOS4iemHjSwyNSw2MCwwLjIsNDI4NiwxMjUiKQpzdHJzcGxpdCh0eHQsICIsIikgJT4lCiAgZG8uY2FsbCgiYyIsIC4pICU+JQogIG1hdHJpeChieXJvdyA9IFQsIG5jb2wgPSA3KQojICAgICAgWywxXSAgICAgICBbLDJdICAgWywzXSBbLDRdIFssNV0gIFssNl0gICBbLDddIAojIFsxLF0gIjIwMjIwNDA0IiAi5p2/5qmLIiAiMzgiICI0MCIgIjAuMSIgIjQyODgiICIxMjAiCiMgWzIsXSAiMjAyMjA0MDQiICLkuInph40iICIyNSIgIjYwIiAiMC4yIiAiNDI4NiIgIjEyNSIKIyBbMyxdICIyMDIyMDQwNCIgIuadv+apiyIgIjM4IiAiNDAiICIwLjEiICI0Mjg4IiAiMTIwIgojIFs0LF0gIjIwMjIwNDA0IiAi5LiJ6YeNIiAiMjUiICI2MCIgIjAuMiIgIjQyODYiICIxMjUiCiMgWzUsXSAiMjAyMjA0MDQiICLmnb/mqYsiICIzOCIgIjQwIiAiMC4xIiAiNDI4OCIgIjEyMCIKIyBbNixdICIyMDIyMDQwNCIgIuS4iemHjSIgIjI1IiAiNjAiICIwLjIiICI0Mjg2IiAiMTI1IgojIFs3LF0gIjIwMjIwNDA0IiAi5p2/5qmLIiAiMzgiICI0MCIgIjAuMSIgIjQyODgiICIxMjAiCiMgWzgsXSAiMjAyMjA0MDQiICLkuInph40iICIyNSIgIjYwIiAiMC4yIiAiNDI4NiIgIjEyNSIK