Вопросы с тегом «r»

R - это свободный язык программирования с открытым исходным кодом и программная среда для статистических вычислений, биоинформатики, визуализации и общих вычислений. Пожалуйста, предоставьте минимальный и воспроизводимый пример (ы) вместе с желаемым результатом. Используйте `dput ()` для данных и укажите все неосновные пакеты с помощью вызовов library (). Не вставляйте изображения для данных или кода, вместо этого используйте блоки кода с отступом. Для вопросов, связанных со статистикой, используйте https://stats.stackexchange.com.

7
«Правильный» способ указать необязательные аргументы в функциях R
Меня интересует, каков «правильный» способ написания функций с необязательными аргументами в R. Со временем я наткнулся на несколько фрагментов кода, которые идут по другому пути, и я не смог найти правильную (официальную) позицию по этой теме. До сих пор я писал необязательные аргументы вроде этого: fooBar <- function(x,y=NULL){ if(!is.null(y)) x …
165 r  function 
8
Изменение формы data.frame из широкого в длинный формат
У меня возникли проблемы с преобразованием моего data.frameиз широкого стола в длинный стол. На данный момент это выглядит так: Code Country 1950 1951 1952 1953 1954 AFG Afghanistan 20,249 21,352 22,532 23,557 24,555 ALB Albania 8,097 8,986 10,058 11,123 12,246 Теперь я хотел бы превратить это data.frameв длинный data.frame. Что-то …
164 r  dataframe  reshape  r-faq 
11
Преобразовать столбец data.frame в вектор?
У меня есть датафрейм, такой как: a1 = c(1, 2, 3, 4, 5) a2 = c(6, 7, 8, 9, 10) a3 = c(11, 12, 13, 14, 15) aframe = data.frame(a1, a2, a3) Я попробовал следующее, чтобы преобразовать один из столбцов в вектор, но это не работает: avector <- as.vector(aframe['a2']) class(avector) …
29
сеанс не создан: эта версия ChromeDriver поддерживает только ошибку Chrome версии 74 с ChromeDriver Chrome с использованием Selenium
Я пытаюсь запустить RSelenium с помощью функции rsDriver, но когда я запускаю, rD <- rsDriver() я получаю сообщение о том, что мне нужна более новая версия Chrome: > rD <- rsDriver() checking Selenium Server versions: BEGIN: PREDOWNLOAD BEGIN: DOWNLOAD BEGIN: POSTDOWNLOAD checking chromedriver versions: BEGIN: PREDOWNLOAD BEGIN: DOWNLOAD BEGIN: POSTDOWNLOAD …
7
Нумерация строк в группах в кадре данных
Работа с фреймом данных, похожим на этот: set.seed(100) df <- data.frame(cat = c(rep("aaa", 5), rep("bbb", 5), rep("ccc", 5)), val = runif(15)) df <- df[order(df$cat, df$val), ] df cat val 1 aaa 0.05638315 2 aaa 0.25767250 3 aaa 0.30776611 4 aaa 0.46854928 5 aaa 0.55232243 6 bbb 0.17026205 7 bbb 0.37032054 …
163 r  dataframe  r-faq 
12
Получать доступ к именам индексов внутри FUN
Есть ли способ получить имя индекса списка в моей функции lapply ()? n = names(mylist) lapply(mylist, function(list.elem) { cat("What is the name of this list element?\n" }) Я спросил , прежде чем , если это возможно , чтобы сохранить имена индексов в lapply () возвращенный список, но я до сих …
162 r  lapply  names  indices 
14
Проблемы с установкой пакета devtools
Я хочу использовать devtoolsпакет. Я выполнил следующие команды: > install.packages("devtools", dependencies = TRUE) .... > library(devtools) Error in library(devtools) : there is no package called ‘devtools’ Что я делаю не так? Редактировать: Вот результаты повторного запуска install.packagesкоманды после перезапуска сеанса. > install.packages("devtools", dependencies = TRUE) Installing package into ‘/home/evanaad/R/x86_64-pc-linux-gnu-library/3.0’ (as …
162 r  package  devtools 
6
Как запретить ifelse () превращать объекты Date в числовые объекты
Я использую функцию ifelse()для манипулирования вектором даты. Я ожидал, что результат будет классным Date, и был удивлен, numericполучив вместо этого вектор. Вот пример: dates <- as.Date(c('2011-01-01', '2011-01-02', '2011-01-03', '2011-01-04', '2011-01-05')) dates <- ifelse(dates == '2011-01-01', dates - 1, dates) str(dates) Это особенно удивительно, потому что выполнение операции по всему вектору …
162 r  datetime  if-statement 
11
Как организовать большие программы R?
Когда я беру проект R любой сложности, мои сценарии быстро становятся длинными и запутанными. Какие методы я могу использовать, чтобы с моим кодом всегда было приятно работать? Я думаю о таких вещах, как Размещение функций в исходных файлах Когда что-то разбить на другой исходный файл Что должно быть в мастер-файле …
10
Как очистить только несколько конкретных объектов из рабочей области?
Я хотел бы удалить некоторые данные из рабочей области. Я знаю, что кнопка «Очистить все» удалит все данные. Тем не менее, я хотел бы удалить только определенные данные. Например, у меня есть эти фреймы данных в разделе данных: data data_1 data_2 data_3 Я хотел бы удалить data_1, data_2и data_3, сохраняя …
161 r 
13
Сравните два data.frames, чтобы найти строки в data.frame 1, которых нет в data.frame 2
У меня есть следующие 2 data.frames: a1 <- data.frame(a = 1:5, b=letters[1:5]) a2 <- data.frame(a = 1:3, b=letters[1:3]) Я хочу найти строку a1, которую a2 не имеет. Есть ли встроенная функция для этого типа операции? (ps: я действительно написал решение для этого, мне просто любопытно, если кто-то уже сделал более …
161 r  merge  compare  rows  dataframe 
15
Самый быстрый способ найти второе (третье ...) самое высокое / самое низкое значение в векторе или столбце
R предлагает максимум и минимум, но я не вижу действительно быстрого способа найти другое значение в порядке, кроме сортировки всего вектора и последующего выбора значения x из этого вектора. Например, есть ли более быстрый способ получить второе по величине значение?
161 r  vector 
8
Как считать ИСТИННЫЕ значения в логическом векторе
В R, каков наиболее эффективный / идиоматический способ подсчета количества TRUEзначений в логическом векторе? Я могу придумать два пути: z <- sample(c(TRUE, FALSE), 1000, rep = TRUE) sum(z) # [1] 498 table(z)["TRUE"] # TRUE # 498 Какой ты предпочитаешь? Есть ли что-нибудь еще лучше?
160 r 
4
Добавить новую строку в dataframe, с определенным индексом строки, не добавляется?
Следующий код объединяет вектор с фреймом данных: newrow = c(1:4) existingDF = rbind(existingDF,newrow) Однако этот код всегда вставляет новую строку в конце кадра данных. Как я могу вставить строку в указанной точке в кадре данных? Например, предположим, что в фрейме данных 20 строк, как вставить новую строку между строками 10 …
160 r  dataframe  insert 
4
Почему слияния панд в python быстрее, чем слияния data.table в R в 2012 году?
Недавно я наткнулся на библиотеку pandas для python, которая в соответствии с этим тестом выполняет очень быстрое слияние в памяти. Это даже быстрее, чем пакет data.table в R (мой язык для анализа). Почему pandasтак быстрее чем data.table? Это из-за присущего скорости питона преимущество над R, или есть какой-то компромисс, о …
160 python  r  join  data.table  pandas 
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.