Programmierung r

6

Übereinstimmende Zeichen entfernen und entfernen: Ersetzen Sie mehrere (3+) nicht aufeinanderfolgende Vorkommen

Ich suche nach einem regexMuster, das dem dritten, vierten, ... Vorkommen jedes Zeichens entspricht. Schauen Sie unten zur Verdeutlichung: Zum Beispiel habe ich die folgende Zeichenfolge: 111aabbccxccybbzaa1 Ich möchte alle duplizierten Zeichen nach dem zweiten Vorkommen ersetzen. Die Ausgabe wird sein: 11-aabbccx--y--z--- Einige Regex-Muster, die ich bisher ausprobiert habe: Mit …

9 python r regex string

4

Gibt es eine schnellere Möglichkeit, um zu überprüfen, ob Listen in einer Liste gleichwertig sind?

Hier habe ich ganze Zahlen 1:7für vier verschiedene Partitionen, dh {1}, {2,3,4}, {5,6} und {7}, und diese Partitionen werden in eine Liste geschrieben, dh , list(1,c(2,3,4),c(5,6),7). Ich behandle die Partitionen als Mengen, so dass unterschiedliche Permutationen von Elementen innerhalb einer Partition als dieselbe erkannt werden sollten. Zum Beispiel list(1,c(2,3,4),c(5,6),7)und list(7,1,c(2,3,4),c(6,5))sind …

9 r algorithm list performance

1

Schnellere Alternative zu deparse ()

Ich pflege ein Paket, das auf wiederholten Anrufen beruht deparse(control = c("keepNA", "keepInteger")). controlist immer gleich und der Ausdruck variiert. deparse()scheint viel Zeit damit zu verbringen, die gleichen Optionen wiederholt mit zu interpretieren .deparseOpts(). microbenchmark::microbenchmark( a = deparse(identity, control = c("keepNA", "keepInteger")), b = .deparseOpts(c("keepNA", "keepInteger")) ) # Unit: microseconds …

9 r

3

Was kann ich mit dtplyr nicht machen, was ich in data.table kann?

Soll ich meinen Lernaufwand für die Daten Gerangel in R, und zwar zwischen investieren dplyr, dtplyrund data.table? Ich benutze dplyrmeistens, aber wenn die Daten dafür zu groß sind, werde ich sie verwenden data.table, was selten vorkommt. Nun, da dtplyrv1.0 als Schnittstelle für herauskommt data.table, scheint es, als müsste ich mir …

9 r dplyr data.table dtplyr

5

Erstellen einer neuen Spalte unter bestimmten Bedingungen basierend auf den vorherigen n Zeilen

Ich habe einen Datenrahmen wie folgt eingerichtet: df <- data.frame("id" = c(111,111,111,222,222,222,222,333,333,333,333), "Location" = c("A","B","A","A","C","B","A","B","A","A","A"), "Encounter" = c(1,2,3,1,2,3,4,1,2,3,4)) id Location Encounter 1 111 A 1 2 111 B 2 3 111 A 3 4 222 A 1 5 222 C 2 6 222 B 3 7 222 A 4 8 …

9 r dataframe dplyr duplicates

2

R: Wie trenne ich die Codelogik elegant von UI / HTML-Tags?

Problem Wenn dynamisch ui-Elemente zu schaffen ( shiny.tag, shiny.tag.list, ...), finde ich es oft schwierig , es von meiner Code - Logik zu trennen und in der Regel mit einem gewundenen Durcheinander von verschachteltem Endetags$div(...) , gemischt mit Schleifen und bedingten Anweisungen. Es ist zwar nervig und hässlich anzusehen, aber …

9 r shiny templating htmltools

1

So fügen Sie Bilder in jede einzelne Leiste in einem ggplot-Diagramm ein

Ich versuche, verschiedene NBA-Neulinge in verschiedenen Statistiken zu vergleichen, und ich dachte, das Diagramm würde großartig aussehen, wenn ich das Gesicht des Spielers am Ende des Diagramms hinzufügen könnte, wie in den r / dataisbeautiful-Diagrammen . Mein Code lautet derzeit: a3 %>% ggplot(aes(x = reorder(Player, PPM), y = PPM)) + …

9 r image ggplot2

3

Wie können die Zeichen in einer Zeichenfolge in R effizient sortiert werden?

Wie kann ich die Zeichen jeder Zeichenfolge in einem Vektor effizient sortieren? Beispiel: Geben Sie einen Vektor von Zeichenfolgen an: set.seed(1) strings <- c(do.call(paste0, replicate(4, sample(LETTERS, 10000, TRUE), FALSE)), do.call(paste0, replicate(3, sample(LETTERS, 10000, TRUE), FALSE)), do.call(paste0, replicate(2, sample(LETTERS, 10000, TRUE), FALSE))) Ich habe eine Funktion geschrieben, die jede Zeichenfolge in …

9 r string performance sorting

4

Effiziente Methode zum Löschen von Zeilen mit überlappenden Zeiten

Ich habe einen langen Datensatz mit Spalten, die Start- und Stoppzeiten darstellen, und ich möchte eine Zeile löschen, wenn sie sich mit einer anderen überschneidet und eine höhere Priorität hat (z. B. 1 ist die höchste Priorität). Meine Beispieldaten sind library(tidyverse) library(lubridate) times_df <- tibble(start = as_datetime(c("2019-10-05 14:05:25", "2019-10-05 17:30:20", …

9 r dplyr

1

Zeichnen von Rechtecken auf Bild R glänzend

Ich möchte auf die akzeptierte Antwort auf diese Frage eingehen . Ich möchte die minimal glänzende App unten (extrahiert aus der akzeptierten Antwort) mit den folgenden Funktionen verbessern: 1) Zeichnen Sie das Rechteck + eine Textbeschriftung . Das Label stammt von R ( input$foo), z. B. aus einem Dropdown. Um …

9 javascript r browser shiny

2

Rcpp- und int64-NA-Wert

Wie kann ich einen NA-Wert von Rcpp an R in einem 64-Bit-Vektor übergeben? Mein erster Ansatz wäre: // [[Rcpp::export]] Rcpp::NumericVector foo() { Rcpp::NumericVector res(2); int64_t val = 1234567890123456789; std::memcpy(&(res[0]), &(val), sizeof(double)); res[1] = NA_REAL; res.attr("class") = "integer64"; return res; } Aber es gibt nach #> foo() integer64 [1] 1234567890123456789 9218868437227407266 …

8 r rcpp na bit64

2

Stellen Sie die Zeilenreihenfolge für R data.table ein, indem Sie 2 Spalten verketten

Ich versuche herauszufinden, wie man eine R-Datentabelle basierend auf der Verkettung von 2 Spalten bestellt. Hier ist meine Beispieldatentabelle. dt <- data.table(id = c('A', 'A', 'A', 'A', 'A') , col1 = c(7521, 0, 7915, 5222, 5703) , col2 = c(7907, 5703, 8004, 7521, 5222)) id col1 col2 1: A 7521 …

8 r data.table

1

Umfang und Bewertung von Funktionen in R.

Gegeben die folgende Funktion f <- function(x) { g <- function(y) { y + z } z <- 4 x + g(x) } Wenn man den folgenden Code in R ausführt, warum ist die Antwort 10? Ich bin ein wenig verwirrt darüber, wie Sie in diese Frage hineinspielen. z <- …

8 r scoping

3

Liniendichte-Heatmap in R.

Problembeschreibung Ich habe Tausende von Linien (~ 4000), die ich zeichnen möchte. Es ist jedoch nicht möglich, alle Linien mit zu zeichnen geom_line()und nur alpha=0.1zu veranschaulichen, wo es eine hohe Liniendichte gibt und wo nicht. Ich bin in Python auf etwas Ähnliches gestoßen , besonders die zweite Handlung der Antworten …

8 r ggplot2 plot heatmap

1

Gibt es in R eine Möglichkeit, eine Legende mit zwei Achsen zu zeichnen?

Ich möchte eine Legende mit zwei Achsen zeichnen. Insbesondere habe ich zwei klassifizierte räumliche Objekte kombiniert, wobei das erste die Intensität eines Ereignisses und das zweite die Wahrscheinlichkeit des Ereignisses an diesem Ort zeigt. Ich möchte eine Legende erstellen, die zeigt, wo die Pixel des kombinierten Rasters in jede Kategorie …

8 r ggplot2 legend spatial r-raster

Als «r» getaggte Fragen