Articles of r

Operator == in logischen Spalten in data.table inkonsistent

Bitte beachten Sie das folgende reproduzierbare Beispiel: library(data.table) set.seed(123) DT <- data.table(A=rep(0.3,10000)) DT[, B := runif(.N) < A] DT[B == T, .N] # [1] 3005 DT[, summary(B)] # Mode FALSE TRUE NA's # logical 6995 3005 0 Alles sieht gut aus und die Anzahl der “TRUE” -Werte ist für die beiden Methoden gleich. Ersetzen Sie […]

ggplot, Zeichnungslinie zwischen Punkten über Facetten

Wie kann ich mit ggplot2 eine Trendlinie zeichnen, die zwischen Facetten verläuft? library(ggplot2) df <- data.frame(y=c(1,2,3),x=1,Set=LETTERS[1:3]) ggplot(df,aes(x,y)) + theme_bw() + theme(legend.position=c(0,1),legend.justification=c(0,1)) + geom_point(aes(fill=Set),color="black",shape=21,size=3) + facet_grid(~Set) + xlim(1,5) Was folgendes bewirkt: Im obigen möchte ich eine Linie zwischen den drei Punkten ziehen, die sich über Facetten bewegen.

So berechnen Sie den Abstand zwischen Koordinatenpaaren effizient mit data.table: =

Ich möchte die effizienteste (schnellste) Methode finden, um die Abstände zwischen Paaren von Längenkoordinaten zu berechnen. Eine nicht so effiziente Lösung wurde (hier) mit sapply und spDistsN1{sp} . Ich glaube, das könnte viel schneller gemacht werden, wenn man spDistsN1{sp} in data.table mit dem Operator := , aber das war nicht möglich. Irgendwelche Vorschläge? Hier ist […]

Speicherverbrauch von Objekten ermitteln?

Ich möchte herausfinden, wie viel RAM von jedem meiner Objekte in meinem aktuellen Arbeitsbereich verwendet wird. Gibt es einen einfachen Weg, dies zu tun?

Wie teilt man einen String in Teilstrings einer bestimmten Länge auf?

Ich habe eine Zeichenfolge wie: “aabbccccdd” Ich möchte diese Zeichenfolge in einen Vektor von Teilzeichenfolgen der Länge 2 aufteilen: “aa” “bb” “cc” “cc” “dd”

Wie ändere ich das Gebietsschema von R?

Ich benutze R Version 2.15.3 (2013-03-01) auf Ubuntu 12.10. Das System ist in Deutsch und R auch. Dies ist unpraktisch bei der Suche nach Fehlermeldungen. Wird R in xterm auf diese Weise $ LANG=”C” R triggers $ LANG=”C” R das Problem teilweise. Dann zeigt R alles auf Englisch an. Aber wenn RStudio auf diese Weise […]

Warum ist allow.cartesian zu Zeiten erforderlich, wenn data.tables mit doppelten Schlüsseln verbunden wird?

Ich versuche, die Logik von J () zu verstehen, wenn es doppelte Schlüssel in einer data.table in R gibt. Hier ist ein kleines Experiment, das ich versucht habe: library(data.table) options(stringsAsFactors = FALSE) x <- data.table(keyVar = c("a", "b", "c", "c"), value = c( 1, 2, 3, 4)) setkey(x, keyVar) y1 <- data.frame(name = c("d", "c", […]

Linke Verbindung mit data.table

Angenommen, ich habe zwei data.tables : EIN: AB 1: 1 12 2: 2 13 3: 3 14 4: 4 15 B: AB 1: 2 13 2: 3 14 und ich habe den folgenden Code: merge_test = merge(dataA, dataB, by=”A”, all.data=TRUE) Ich bekomme: A Bx By 1: 2 13 13 2: 3 14 14 Ich möchte […]

Endung “+” Prompt in R

Ich bin ziemlich neu in R und ich machte einen Typ-O, während ich etwas Code eingab und jetzt anstelle der “>” – Eingabeaufforderung eine “+” – Eingabeaufforderung erhielt. Ich scheine in einer Art von function stecken zu bleiben, die auf der Suche nach Input ist, aber ich kann mich scheinbar nicht davon befreien. Ich denke, […]

ggplot separate Legende und Handlung

Ich verwende das Gitter lpackage, um meine Graphen zu platzieren, die ich mit ggplot2 erstellt habe : library(ggplot2) library(grid) Layout <- grid.layout(nrow = 4, ncol = 4, widths = unit(1, "null"), heights = unit(c(0.4, 0.8, 1.2, 1.2), c("null", "null", "null"))) grid.show.layout(Layout) plot1 = ggplot(diamonds, aes(clarity, fill = color)) + geom_bar() + facet_wrap(~cut, nrow = 1) […]