Konvertieren von JSON-Dateien in R / Text-Dateien ohne Ausführung
Rstudio ist während der Arbeit abgestürzt und die nicht gespeicherten Dateien konnten nicht in die Sitzung geladen werden. Die Dateien sind jedoch im JSON-Format verfügbar. Ein Beispiel
{
"contents" : "library(hgu133a.db)\nx <- hgu133aENSEMBL\nx\nlength(x)\ncount.mappedkeys(x)\nx[1:3]\nlinks(x[1:3])\n\n## Keep only the mapped keys\nkeys(x) <- mappedkeys(x)\nlength(x)\ncount.mappedkeys(x)\nx # now it is a submap\n\n## The above subsetting can also be achieved with\nx <- hgu133aENSEMBL[mappedkeys(hgu133aENSEMBL)]\n\n",
"created" : 1463131195093.000,
"dirty" : true,
"encoding" : "",
"folds" : "",
"hash" : "1482602869",
"id" : "737C178C",
"lastKnownWriteTime" : 0,
"path" : null,
"project_path" : null,
"properties" : {
"tempName" : "Untitled3"
},
"source_on_save" : false,
"type" : "r_source"
}
Die Dateien im JSON-Format können mit @ gelesen werdejsonlite::fromJSON
und die erforderlichen Informationen wurden in der Inhaltsvariablen gespeichert. Beim Versuch, die Befehle mit dem @ zu lesreadLines()
oderscan()
Die Befehle wurden ausgeführt, anstatt sie in eine einfache Datei zu konvertieren. Wie man dies in ein @ umwander
Datei
output (?): Befehl in einemr
script / text file.
library(hgu133a.db)
x <- hgu133aENSEMBL
x
length(x)
count.mappedkeys(x)
x[1:3]
links(x[1:3])
## Keep only the mapped keys
keys(x) <- mappedkeys(x)
length(x)
count.mappedkeys(x)
x
# now it is a submap
## The above subsetting can also be achieved with
x <- hgu133aENSEMBL[mappedkeys(hgu133aENSEMBL)]