Programowanie dplyr

7

Mam następującą ramkę danych: library(dplyr) library(tibble) df <- tibble( source = c("a", "b", "c", "d", "e"), score = c(10, 5, NA, 3, NA ) ) df To wygląda tak: # A tibble: 5 x 2 source score <chr> <dbl> 1 a 10 . # current max value 2 b 5 …

18 r dplyr tibble

3

Zastosowanie niestandardowej oceny opartej na tidyeval w przekodowaniu po prawej stronie mutacji

Rozważmy tabliczkę, w której każda kolumna jest wektorem znaków, który może przyjmować wiele wartości - powiedzmy „A” do „F”. library(tidyverse) sample_df <- tibble(q1 = c("A", "B", "C"), q2 = c("B", "B", "A")) Chciałbym utworzyć funkcję, która przyjmuje nazwę kolumny jako argument i koduje tę kolumnę tak, aby każda odpowiedź „A” …

13 r dplyr rlang tidyeval nse

1

Jak obrócić ramkę danych składającą się z kolumny z sekcją i podsekcją w R.

Mam niżej wymienioną ramkę danych: structure( list(ID = c("P-1", " P-1", "P-1", "P-2", "P-3", "P-4", "P-5", "P-6", "P-7", "P-8"), Date = c("2020-03-16 12:11:33", "2020-03-16 13:16:04", "2020-03-16 06:13:55", "2020-03-16 10:03:43", "2020-03-16 12:37:09", "2020-03-16 06:40:24", "2020-03-16 09:46:45", "2020-03-16 12:07:44", "2020-03-16 14:09:51", "2020-03-16 09:19:23"), Status = c("SA", "SA", "SA", "RE", "RE", "RE", "RE", …

12 r dataframe dplyr tidyverse tidyr

1

Dynamiczne mutowanie wielu kolumn podczas warunkowania określonych wierszy

Wiem, że jest tu kilka podobnych pytań, ale wydaje się, że żadne z nich nie odnosi się do konkretnego problemu, który mam. set.seed(4) df = data.frame( Key = c("A", "B", "A", "D", "A"), Val1 = rnorm(5), Val2 = runif(5), Val3 = 1:5 ) Chcę zerować wartości kolumn wartości dla wierszy, …

11 r dplyr data.table

2

warunek filtru dplyr do rozróżnienia symbolu Unicode od jego reprezentacji Unicode

Próbuję filtrować kolumnę Symbol na podstawie tego, czy ma formę \uxxxx To proste wizualnie, czyli niektóre wyglądają jak $, ¢, £, i inne, jak \u058f, \u060b, \u07fe. Ale nie mogę tego rozgryźć za pomocą stringi/dplyr library(dplyr) library(stringi) df <- structure(list(Character = c("\\u0024", "\\u00A2", "\\u00A3", "\\u00A4", "\\u00A5", "\\u058F", "\\u060B", "\\u07FE", "\\u07FF", …

10 r dplyr stringr stringi

3

Czego nie mogę zrobić z dtplyr, że mogę w data.table

Czy powinienem inwestować wysiłki w uczenie się na przekręcaniu danych w R, szczególnie pomiędzy dplyr, dtplyra data.table? Używam dplyrgłównie, ale gdy dane są za duże na to, skorzystam data.table, co jest rzadkim zjawiskiem. Teraz, gdy dtplyrwersja 1.0 jest dostępna jako interfejs data.table, na pierwszy rzut oka wydaje się, że nigdy …

9 r dplyr data.table dtplyr

5

Tworzenie nowej kolumny warunkowo na podstawie poprzednich n wierszy

Mam skonfigurowaną ramkę danych, jak poniżej: 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 333 …

9 r dataframe dplyr duplicates

4

Skuteczny sposób upuszczania wierszy z nakładającymi się czasami

Mam długi zestaw danych z kolumnami reprezentującymi czasy rozpoczęcia i zakończenia i chcę upuścić wiersz, jeśli pokrywa się on z innym i ma wyższy priorytet (np. 1 jest najwyższym priorytetem). Moje przykładowe dane to library(tidyverse) library(lubridate) times_df <- tibble(start = as_datetime(c("2019-10-05 14:05:25", "2019-10-05 17:30:20", "2019-10-05 17:37:00", "2019-10-06 04:43:55", "2019-10-06 04:53:45")), …

9 r dplyr

Pytania otagowane jako dplyr