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

Подробнее про r...

Хорошо, я новичок в stackoverflow и R. Это, вероятно, довольно глупая проблема, но я нигде не мог найти решения. Пакеты library(tidyverse) Вот код sample_size_finder <- function(variable, value){ df %>% select(variable) %>% filter(variable == value) %>% count() } df = фрейм данных,....
9 Окт 2021 в 03:03
У меня есть два вектора чисел: v1 и v2 Первый - это набор действительных чисел. Второй - это набор десятичных знаков, которые я хочу округлить или отформатировать v1. Вот векторы: v1 <- c(7.449835, 6.649058, 9.072736, 5.643506, 8.979166, 5.544238, 1.746717, 4.151327, 8.408533, 1.176206) v2 <- c(1, ....
r
9 Окт 2021 в 01:49
Я уверен, что это глупый вопрос ... но я огляделся и, похоже, ничего не нашел. Скажем, у меня есть две таблицы: a <- data.table(row_id = 1:12) b <- data.table(start_row = c(1,5,10),end_row = c(3,7,11),value = c("a","b","c")) > a row_id 1: 1 2: 2 3: 3 4: 4 5: 5 6: ....
8 Окт 2021 в 23:38
У меня есть фрейм данных, где значения широты (lat) - это имена строк, а значения долготы (lon) - это имена столбцов, а для каждой ячейки фрейма данных - интересующее меня значение температуры (temp) (или значение NA), например: lon lon lon lon lon lon lat temp temp temp temp temp temp lat....
8 Окт 2021 в 23:16
Я делаю график, используя ggplot2 и небольшой фреймворк df. В моем фрейме данных есть групповая переменная Letter и две числовые переменные X и Y (я включаю dput() версию df в конце этого сообщения). Моя основная проблема возникает, когда я пытаюсь выровнять метки полос сверху. Из-за моего дизайна....
8 Окт 2021 в 21:48
У меня есть строки, которые выглядят так: problem <- c("GROUP 1", "GROUP 1 & GROUP 2", "GROUP 1 & GROUP 2 & GROUP 3", "GROUP 1 & GROUP 2 & GROUP 3 & GROUP 4") Между каждой группой стоит знак «&». Я хочу использовать R (либо sub (), либо что-то из пакета stringr), чтобы заменить каждый «&» на «,», ....
8 Окт 2021 в 21:37
Когда dplyr возвращает ничьи при использовании slice_min и slice_max? Я вижу некоторые несоответствия и не могу найти никаких разъяснений в Интернете или в их документации. Примеры: library(dplyr) #there is a tie but only returns 5 rows, not the bottom 5 mpg's mtcars %>% slice_min(mpg, n = 5, with....
8 Окт 2021 в 21:32
У меня есть фрейм данных в R со списком переменных. Однако я напечатал последние два столбца, которые меня интересуют. Я хочу удалить все вхождения НП в столбце значение только тогда, когда b s_Scores == bs_24. bs_Scores value bs_0 16.7 bs_1 41.7 bs_12 33.3 bs_24 NA bs_0 25 bs....
8 Окт 2021 в 20:54
У меня такое ДТ: id = c(rep(1,10), rep(2, 5), rep(3,12)) th = c(rep(c(0,1),5), c(0, 1, 0, 1, 0), rep(c(1,0,1),4 )) drugs = c(rep(c("A","B","C","D","E"),2), c("A", "B", "B", "B", "A"), rep(c("C","D","c"),4 )) DT = data.table(id, th, drugs) DT id th drugs seq 1: 1 0 A 1 2: 1 1 B ....
8 Окт 2021 в 19:18
Я пытаюсь открыть URL-адрес и закрыть URL-адрес, чтобы заставить мою виртуальную машину думать, что я работаю. Я работаю в R с linx os. Мне нужно, чтобы он открыл браузер, подождите минуту и ​​закройте браузер. мой код до сих пор: repeat{ startTime <- Sys.time() site <- browseURL("https://youtu....
8 Окт 2021 в 18:52
Воспроизводимый код R library(ggplot2) library(metR) v <- reshape2::melt(volcano) g <- ggplot(v, aes(Var1, Var2)) + geom_contour(aes(z = value), color = "white", size = 1.25, breaks = c(100, 110, 120, 130, 140, 150, 160, 170, 180, 190)) + geom_contour(aes(z = value, linetype = ife....
8 Окт 2021 в 17:06
У меня есть таблица такого стиля: a b c d 1 225.4 45 1920 1 2 812.3 101 1930 1 3 623.7 23 1965 2 4 551.7 32 1975 3 5 1374.1 91 1975 3 6 931.0 64 1912 3 Как я могу получить таблицу пропорций столбц....
r
8 Окт 2021 в 16:49
Мой заголовок может быть не очень информативным, но это пример, раскрывающий мою проблему: У меня есть этот фреймворк: df=data.frame(cond1=c(1,1,1,2,2,2,3,3,3,1,1,1,2,2,2,3,3,3), group=c("F","V","M","F","V","M","F","V","M","F","V","M","F","V","M","F","V","M"), gene=c("A",....
r
8 Окт 2021 в 16:37
У меня есть следующие данные в таблице, которую я ввел в R: Group Light Dark 1 One 29 29 2 Two 72 54 3 Three 54 39 4 Four 17 7 5 Five 14 6 6 Six 3 9 7 Seven 8 17 Что я хочу сделать дальше, так это изоб....
8 Окт 2021 в 15:46
Я знаю, что есть этот метод на стороне сервера, называемый renderUI, но в некоторых случаях он делает обновление пользовательского интерфейса чрезвычайно медленным, поэтому теперь я полагаюсь на JavaScript. Моя проблема заключается в следующем. Я хочу обновить атрибут title для material_card из пак....
8 Окт 2021 в 15:42
В настоящее время я работаю над набором данных с несколькими биопсиями для каждого идентификатора пациента. Мне нужно найти результат биопсии, наиболее близкий к определенной дате (индивидуальный для каждого пациента). Фиктивный набор данных можно увидеть ниже. df <- data.frame(m1 = c("1","1","1"....
8 Окт 2021 в 14:21
Если бы мне нужно было найти класс каждого столбца, я бы обычно (при условии, что я хотел бы избежать str): lapply(df, class) Однако что, если бы я хотел сделать то же самое для нескольких фреймов данных? Например.: x <- data.table(col_1 = c('a', 'b') , col_2 = 1:2 ....
8 Окт 2021 в 13:26
У меня есть этот дф df <- data.frame( id = c(1L,1L,1L,2L,2L,3L), keyword = c("car","hospital",NA,"cat",NA,NA)) Я бы хотел получить это df <- data.frame( id = c(1L,1L,2L,3L), keyword = c("car","hospital","cat",NA)) Если есть ключевое слово, я бы хотел его сохранить, а если его нет, ....
8 Окт 2021 в 11:41
При запуске приведенного ниже кода MWE пользователь может дополнительно вводить данные в 1-ю матрицу, отображаемую на боковой панели, и во вторую матрицу, отображаемую в модальном диалоговом окне. Вторая матрица позволяет пользователю добавлять сценарии, а также изменять входные данные 1-й матрицы,....
8 Окт 2021 в 10:09
У меня есть такие данные: library(lubridate) library(dplyr) set.seed(2021) gen_date <- seq(ymd_h("2021-01-01-00"), ymd_h("2021-09-30-23"), by = "hours") hourx <- hour(gen_date) datex <- date(gen_date) sales <- round(runif(length(datex), 10, 50), 0)*100 mydata <- data.frame(datex, hourx, sales) Как....
8 Окт 2021 в 07:35
В пакете factoextra, когда я использую функцию fviz_eig, как настроить ширину столбца и размер метки? ("width = 0.6, text.size = 17" кажется, не работает, также сообщение об ошибке не отображается) library(factoextra) data(iris) res.pca <- prcomp(iris[,-5],scale=TRUE) fviz_eig(res.pca,addlabels = T....
r
8 Окт 2021 в 06:26
Я работаю с набором данных, который включает все 50 состояний, и я хочу иметь возможность создать новый столбец, который проверяет, в каком регионе находится состояние, и назначает эту строку конкретному региону. Т.е. West <- c("Washington", "Oregon", "California", "Arizona", "Utah", "Idaho", "Colo....
r
8 Окт 2021 в 05:38
Вот пример кода: Group <- c("A", "A", "A", "A", "A", "B", "B", "B","B", "B") Actor <- c(1, 3, 6, 4, 1, 2, 2, 6, 4, 3) df <- data.frame(Group,Actor) df Теперь я хочу создать три новых столбца (Sex, Status, SexStat) на основе данных в столбцах Group и Actor. Например, если Group = A и Actor = 1, тог....
r
8 Окт 2021 в 03:46
У меня есть столбец в фрейме данных со значениями: «Q1», «Q2», «Q3» и т. Д. Я пытаюсь отделить букву «Q» от числовых значений, используя: DF %>% separate(DF$tmp, c(NA, "Number"), "(?<=[A-Z])(?=[0-9])" ). Я получаю следующую ошибку: «Ошибка: необходимо извлечь столбец с единственным допустимым нижн....
8 Окт 2021 в 00:24
У меня есть следующий фрейм данных: B = data.frame( week = c("2021-08-09", "2021-11-11", "2017-06-18", "2020-09-07", "2020-09-07", "2020-09-07", "2020-09-12", "2020-08-23", "2019-12-22", "2017-10-29"), store = c(14071, 11468, 2428, 17777, 14821, 10935, 5127, 14772, 14772, 14772), f....
8 Окт 2021 в 00:11