Описание тега sapply
NoneSapply is a command in the R language that applies a function to each element of a vector (atomic or list). It may also accept other classes if they are coercible by the function base::as.list. The sapply function returns a vector by default, however will return a list when more suitable or an array if argument simplify = "array" is specified.
2
ответа
Функция lapply с 2 переменными
Я очень зеленый в R, так что, вероятно, есть очень простое решение этого: Я хочу вычислить среднюю корреляцию между векторами столбцов в квадратной матрице: x<-matrix(rnorm(10000),ncol=100) aux<-matrix(seq(1,10000)) loop<-sapply(aux,functio…
31 янв '14 в 13:25
1
ответ
Способ сделать это с помощью применить?
Я хочу взять среднее для каждой строки в разных фреймах данных. Кто-нибудь знает более умный способ сделать это, используя операторы apply? Извините за стену кода. Вам понадобится вектор 1000:1006 для каждого hiXXXX файл, а затем вектор 2:13 для сто…
17 июл '16 в 13:56
1
ответ
Как одновременно использовать sapply и применить для сокращения мультипликативной функции в R
Мне было интересно, как я мог бы использовать sapply а также lapply одновременно, чтобы я мог избежать написания своей функции под названием GG как это выглядит ниже? GG = function(x, y) dnorm(250, mean = x, sd = y)*dnorm(265, mean = x, sd = y) * dn…
20 апр '17 в 17:45
1
ответ
Использование mapply для функции с несколькими аргументами, не дающей ожидаемого результата
Я хотел бы использовать sapply или mapply для выполнения нижеприведенной функции над числами от 3:5 и 9:10. Короче я бы хотел сделать следующее 3^2 + 9 = 18 4^2 + 9 = 25 5^2 + 9 = 34 3^2 + 10 = 19 4^2 + 10 = 26 5^2 + 10 = 35 Тем не менее, я хотел бы…
11 апр '15 в 21:40
0
ответов
Ускорение функций с участием (ы) применяются
Я профилировал свой код, используя lineprof пакет и определили узкие места, чтобы быть в трех функциях perm.stat.list, G.hat, а также emp.FDR, Общей темой, кажется, является использование (s)applyна основе выходных данных профилировщика. Ниже привед…
03 ноя '18 в 22:07
1
ответ
Как применить Chisq.test на уровнях разных категориальных переменных?
Я хочу выступить chisq.test() на каждом уровне категориальной переменной. В настоящее время мне удалось сделать это для каждой категориальной переменной, используя приведенный ниже код. # Random generation of values for categorical data set.seed(12)…
12 июн '15 в 07:02
1
ответ
R - применить функцию к фреймам данных последовательно
У меня есть dataframe mydf, и я разделил его, чтобы получить количество кадров данных, таких как mydf$'1' mydf$'2'...mydf$'n', Я хочу применить свою функцию к этим фреймам данных, чтобы получить результат как resultdf1 <- myfunc(mydf$'1') resultd…
25 авг '16 в 04:40
1
ответ
Применяя sapply или другую функцию apply вместо вложенного цикла for для списков фреймов данных
У меня есть два фрейма данных / списки данных HumanSplitandratSplit` и они имеют вид > ratSplit$Kidney_F_GSM1328570 ratGene ratReplicate alignment RNAtype 1 Crot Kidney_F_GSM1328570 7 REV 2 Crot Kidney_F_GSM1328570 12 REV 3 Crot Kidney_F_GSM13285…
09 авг '14 в 22:44
1
ответ
Можно ли использовать vapply() с FUN.VALUE переменной длины?
Я стараюсь следовать хорошей практике и использовать vapply() вместо sapply() внутри функций, но найти проверку типа из vapply() быть слишком негибким при желании фиксированной длины. Допустим, я хочу что-то вроде этого: list1 <- list(l1_one = 1:…
15 мар '17 в 17:58
1
ответ
Замена фактора преобразуется в символ в R
Я хочу заменить NA в выбранных столбцах на последнее значение в уровнях столбца, но он продолжает преобразовывать столбец в символ: table(sapply(cop2014, class)) factor numeric 400 116 varToCat = c("V21A","A3","Escolari","A17","B8","C5B","RamaEmpPri…
25 мар '18 в 15:20
3
ответа
R данные переводят все столбцы (множители) в десятичные
Это простой вопрос, но похоже, что он не существует в стеке У меня есть фрейм данных, где все столбцы являются факторами, которые я хочу преобразовать в десятичные. Var1 Var2 Var3 Var4 1 0.76 0.84 0.76 0.73 2 0.76 0.84 0.76 0.73 3 0.76 0.84 0.76 0.7…
25 янв '17 в 03:20
0
ответов
Найти индекс источника ошибок в длинном сапли
У меня есть sapply(X, function(blah blah blah) функция, которая приводит к ошибке. Аргумент XОднако есть вектор с длиной> 1000. Когда я пробую несколько значений, это работает, но я знаю, что хотя бы одно из значений в векторе X есть проблема, но я …
26 фев '16 в 17:17
2
ответа
Как передать параметр типа x>1 в функцию ifelse
У меня есть data.frame, как Age 1 2 3 4 5 Я хотел бы сделать новую переменную "AgeGR" getAgeGR = function(x) { xInt = as.integer(x) ifelse( grepl(0, xInt), "Puppy", ifelse(grepl(|What to put here|, xInt), "Young", ifelse(grepl(8, xInt), "Adult","Old…
25 апр '16 в 16:42
1
ответ
R: Весовой параметр в массиве, основанный на других параметрах
У меня есть эта таблица / массив в CSV: GroupID Channel Daysbeforelast 1 А 35 1 B 31 1 С 29 1 Д 17 1 Е 15 1 D 5 1 С 0 2 B 66 2 Е 17 2 D 15 2 А 2 2 С 0 2 F 0 2 А 0 4 B 15 4 С 0 и пытается добавить еще один столбец Weight поэтому таблица будет выгляде…
26 май '15 в 06:18
1
ответ
R обратные строки в кадре данных
У меня большой фрейм данных, и я хотел бы обратить строки, если они не такие же, как в столбце, например, я бы изменил GA на AG и оставил все остальное. structure(list(number = c("rs1", "rs2", "rs3", "rs4", "rs5", "rs6"), ref = c("AG", "AG", "AG", "…
27 июн '17 в 03:55
0
ответов
Использование grep/grepl с функцией apply для сопоставления подстрок для каждой строки в столбце
Мне нужна была помощь по использованию grep с функциями apply, чтобы сопоставить все возможные подстроки для каждой строки в столбце. Пример. Допустим, у меня есть файл данных docQ следующим образом: docQ <- data.frame(QID = c(1,2,3) , QTitle = c…
26 апр '17 в 05:53
1
ответ
Примените функцию к каждому столбцу data.frame и организуйте вывод
У меня есть этот вектор: x <- c(5,2,-4,-6,-2,1,4,2,-3,-6,-1,8,9,5,-6,-11) Я использую эту функцию: myfunction <- function(x){ n <- length(x) fx <- numeric(n) fx[1] <- min(x[1],0) for(i in 2:n){fx[i] <- min(0,fx[i-1]+x[i])} fx x_min…
07 дек '18 в 14:54
2
ответа
Как применить функцию к каждому элементу / ячейке data.frame?
Я хочу округлить до двух десятичных цифр значения, которые являются небольшими и целочисленных значений, которые являются большими. я хочу получить desired.df от df, df <- data.frame(a = c(0.123, 123.456), b = c(321.321, 0.321)) desired.df <- …
04 июн '16 в 21:04
1
ответ
Подгруппы внутри фрейма данных, основанные на соседних свойствах элемента
У меня есть эта структура данных ниже, и мне нужно создать столбец, основанный на связях с элементом A в течение получаса до и после, а также присутствовать в соседних областях (сосед определен как +1 и -1 области). ind area time B 5 3/12/1981 7:20 …
24 сен '15 в 12:57
1
ответ
Как вставить строки с одинаковыми идентификаторами друг за другом в r
Это, вероятно, простой вопрос, но я нигде не могу найти ответ:(, не могли бы вы мне помочь? Если есть фрейм данных, который выглядит так: "ID" "date" A 01-03-2017 A 05-02-2016 B 08-03-2016 A 09-11-2012 B 02-03-2014 B 09-07-2013 C 23-08-2016 B 24-05-…
19 май '18 в 09:30