2017-04-22 4 views
0

Meine Daten sind eine Folge von Zahlen, die mit read.table in R gezogen werden. Hier die Daten:wie in den String-Nummern in R manipulieren?

20402000224222032203233430020222024422320202234232443443004440404332402220404233302004204202004033420200022204334434044422322400200244044322202200234200424402002224303430023432202220343420323200300022320004223040024342244424040322424340240044220302432400203033300042423340222323200020034043004 

ich fügen Sie ein Leerzeichen zwischen den einzelnen Zahl, so dass die Ausgabe sieht mehr wie folgt aus:

2 0 4 0 2 0 0 0.. 

I verwendet:

exm <- read.csv("string.csv") 
txt<- trimws(gsub("", " ", exm)) 
write.csv(txt, file= "new.csv") 

Dies fügt nur einen Raum zwischen Zahlen. Ich mag es, Zahlen separat zu manipulieren. Ich bin nicht gerne String-Nummern. Ich mag es, jede Zahl in eine Excel-Zelle einzufügen.

Antwort

0

Ich denke, das ist, was Sie suchen. Mit strsplit können Sie eine lange Zeichenfolge mit einer kürzeren Zeichenfolge oder in diesem Fall eine leere Zeichenfolge analysieren und die Ergebnisse als Liste zurückgeben.

longAssNumber <- "20402000224222032203233430020222024422320202234232443443004440404332402220404233302004204202004033420200022204334434044422322400200244044322202200234200424402002224303430023432202220343420323200300022320004223040024342244424040322424340240044220302432400203033300042423340222323200020034043004" 

numberVector <- as.numeric(strsplit(longAssNumber, "")[[1]]) 

write.csv(numberVector, "number.csv") 
+0

Vielen Dank. aber das Ergebnis in der write.csv (numberVector, "number.csv") ist: Fehler in (function (..., row.names = NULL, check.rows = FALSCH, check.names = TRUE,: Argumente implizieren unterscheiden Anzahl der Zeilen: 143, 9997. – adele

+0

Ich bekomme diesen Fehler nicht. Können Sie Ihren Beitrag mit dem genauen Code, den Sie ausgeführt haben, bitte ändern? – Gladwell

+0

Vielen Dank. Ich hatte einen Fehler in meiner Datei. Ihr Code hilft mir Arbeit. – adele