Articles of r

Ändern Sie die class von Faktor in numerisch von vielen Spalten in einem Datenrahmen

Was ist der schnellste / beste Weg, um eine große Anzahl von Spalten vom Faktor in numerisch zu ändern? Ich habe den folgenden Code verwendet, aber er scheint meine Daten neu geordnet zu haben. > head(stats[,1:2]) rk team 1 1 Washington Capitals* 2 2 San Jose Sharks* 3 3 Chicago Blackhawks* 4 4 Phoenix Coyotes* […]

Wie speichert man alle Konsolenausgaben in R in Datei?

Ich möchte den gesamten Konsolentext in eine Datei redirect. Hier ist was ich versucht habe: > sink(“test.log”, type=c(“output”, “message”)) > a a > How come I do not see this in log Error: unexpected symbol in “How come” Hier ist, was ich in test.log bekommen habe: [1] “a” Hier ist, was ich in test.log will: […]

Globale Variablen in R

Ich stoße in die Handbücher, ich wollte die Community fragen: Wie können wir globale Variablen innerhalb einer function setzen? Frage-2: In Bezug auf das Plotten, Ich verwende mehrere Diagramme in einem einzelnen Blatt, und um jedes davon zu unterscheiden, möchte ich Titel für jedes von ihnen hinzufügen. Kann mir jemand sagen, wie ich das erreichen […]

shiny 4 small text Eingabefelder Seite an Seite

Ich habe eine glänzende Serverversion 0.4.0 und möchte 4 kleine TextInput-Boxen haben, die so aussehen: x-min x-max y-min y-max […] […] […] […] Sie sehen jetzt so aus: x-min [……………….] x-max [……………….] y-min [……………….] y-max [……………….] Mit diesem Code: textInput(inputId=”xlimitsmin”, label=”x-min”, value = 0.0), textInput(inputId=”xlimitsmax”, label=”x-max”, value = 0.5), textInput(inputId=”ylimitsmin”, label=”y-min”, value = 0.5), textInput(inputId=”ylimitsmax”, […]

Explizites Aufrufen von Rückgabe in einer function oder nicht

Vor einiger Zeit wurde ich von Simon Urbanek vom R-coreteam (ich glaube) dafür zurechtgewiesen, dass er einem Benutzer ausdrücklich empfohlen hat, am Ende einer function eine return aufzurufen (sein Kommentar wurde jedoch gelöscht): foo = function() { return(value) } stattdessen empfahl er: foo = function() { value } Wahrscheinlich in einer Situation wie dieser ist […]

Zeichensäule spalten und eindeutige Werte finden

Ich habe einen Datenrahmen mit folgender Struktur test <- data.frame(col = c('a; ff; cc; rr;', 'rr; a; cc; e;')) Jetzt möchte ich daraus einen Datenrahmen erstellen, der für jeden der eindeutigen Werte im Testdatenrahmen eine benannte Spalte enthält. Ein eindeutiger Wert ist ein Wert, der mit dem “;” Zeichen und beginnend mit einem Leerzeichen, ohne […]

Überprüfen Sie das Vorhandensein des Verzeichnisses und erstellen Sie, wenn es nicht existiert

Ich finde oft, dass ich R-Skripte schreibe, die viel Output erzeugen. Ich finde es sauberer, diese Ausgabe in eigene Verzeichnisse zu setzen. Was ich unten geschrieben habe, wird nach dem Vorhandensein eines Verzeichnisses suchen und sich darin bewegen, oder das Verzeichnis erstellen und dann in dieses hineingehen. Gibt es einen besseren Weg, um das zu […]

Folge alle ganzen Zahlen zwischen zwei Vektoren in R

Ich habe zwei Vektoren: Start = c(1,10,20) Finish = c(9,19,30) Ich möchte, dass so etwas funktioniert … Start Ende Aber natürlich nicht . Ich möchte eine Liste wie die folgende erstellen: [1] 1,2,3,4,5,6,7,8,9 [2] 10 11 12 13 14 15 16 17 18 19 [3] 20 21 22 23 24 25 26 27 28 29 […]

Sankey Diagramme in R?

Ich versuche meinen Datenfluss mit einem Sankey-Diagramm in R zu visualisieren. Ich fand diesen Blogbeitrag mit einem R-Skript verlinkt, das ein Sankey-Diagramm erzeugt, leider ist es ziemlich roh und etwas eingeschränkt (siehe unten für Beispielcode und Daten). Kennt jemand andere Skripts – oder vielleicht sogar ein Paket -, das mehr entwickelt ist? Mein Endziel ist […]

Hängen Sie ein Objekt an eine Liste in R in der amortisierten konstanten Zeit an, O (1)?

Wenn ich eine obj mit der R-Liste mylist , können Sie ein Item obj wie obj anhängen: mylist[[length(mylist)+1]] <- obj Aber sicherlich gibt es einen kompakteren Weg. Als ich neu bei R war, habe ich versucht, lappend() so zu schreiben: lappend <- function(lst, obj) { lst[[length(lst)+1]] <- obj return(lst) } aber das funktioniert natürlich nicht […]