Страница 1 из 1
Сообщества, форумы, etc по языку R
Добавлено: 17 июн 2013, 21:10
Natalia Novoselova
Предлагаю собрать линки на сообщества, форумы и пр - везде, где есть специальные разделы, посвященные языку R.
Главное условие -это возможность ОБЩЕНИЯ (а не только архив литературы)
Поскольку литературы - море в сети, а вот чтобы понять свой вопрос, или же сделать первые шаги в освоении языка, часто необходимо общение.
P.S. (перекрестная ссылка)
Тема форума
по сбору литературы по R (можно убедиться, как ее много)
Re: Сообщества, форумы, etc по языку R
Добавлено: 18 июн 2013, 10:39
rhot
http://stats.stackexchange.com/ : поиск вопросов по тегу R - никаких подфорумов, никаких отдельных разделов, просто и удобно.
http://stackoverflow.com/tags/r/info - то же самое, но на Stack Overflow
Re: Сообщества, форумы, etc по языку R
Добавлено: 18 июн 2013, 14:24
Natalia Novoselova
Спасибо!
Спонтанно в другой моей теме также зашел про это разговор (на первой стр) - даны ресурсы для вопросов, советы по поиску и еще один - русско-язычный ресурс с литературой.
Вот
тема, и вот та ссылка на форум Шипунова (очень активный и полезный, на мой взгляд).
Однако примечательно, что на крупнейших программистский рус-яз форумах нет вообще и упоминания о языке R.
В чем причина, как считаете?
Re: Сообщества, форумы, etc по языку R
Добавлено: 18 июн 2013, 15:09
Natalia Novoselova
R help forum
http://r.789695.n4.nabble.com/R-help-f789696.html
This forum is an archive for the mailing list
r-help@r-project.org (more options) Messages posted here will be sent to this mailing list.
The main R mailing list, for discussion about problems and solutions using R, announcements (not covered by R-announce or R-packages, see above), about the availability of new functionality for R and documentation of R, comparison and compatibility with S-plus, and for the posting of nice examples and benchmarks.
R-bloggers
http://www.r-bloggers.com/
Re: Сообщества, форумы, etc по языку R
Добавлено: 02 июл 2013, 18:23
Anton_Kh
Довольно живая и адекватная группа Вконтакте "Язык программирования R для статистических вычислений":
http://vk.com/club8142131
Re: Сообщества, форумы, etc по языку R
Добавлено: 28 янв 2021, 20:59
mit002
рассчитать дисперсию, максимальный элемент, 35-й процентиль, коэффициент вариции
Data4R <- read_excel("Вар6.xlsx", sheet=1)
result <- rbind(
apply(Data4R, 2, var), #дисперсия
apply(Data4R, 2, max), #максимальное значение
apply(Data4R, 2, quantile, probs = 0.35),
apply(Data4R, 2, sd) / apply(ex1, 2, mean) # коэф. вариации
)
rownames(result) <- c('var', 'max', 'percentile_35', 'coef_var')
Data4R _df <- as.data.frame(result)
write.xlsx(Data4R _df, file = '4R.xlsx')
Re: Сообщества, форумы, etc по языку R
Добавлено: 28 янв 2021, 23:22
mit002
найти такое подмножество, что позволил бы получить регрессионную модель с наибольшим значеним коэффициента детерминации
# Задача минимизации остаточной дисперсии полностью аналогична задаче
# максимизации коэффициента детерминации (задание 5)
# так как R^2 = 1 - var_res
exIM <- read_excel("Вар5.xlsx", sheet = 12)
names(exIM)[1] <- 'prop'
names(exIM)[-1] <- good_names(names(exIM)[-1])
vars <- paste(names(exIM)[-1], collapse = " + ")
formula <- as.formula(paste("prop ~", vars))
fit <- lm(formula, exIM)
summary_1 <- summary(fit)
# Выделяем значимые результаты
p_val <- summary_1$coefficients[,"Pr(>|t|)"]
significant_vars <- names(p_val)[p_val < 0.001][-1]
print(significant_vars) # это ответ
# проверка
optimal_vars <- paste(significant_vars, collapse = " + ")
optimal_formula <- as.formula(paste("prop ~", optimal_vars))
optimal_fit <- lm(optimal_formula, exIM)
summary(optimal_fit)
# Коэффициент детерминации сокращенной модели все еще единица!
Re: Сообщества, форумы, etc по языку R
Добавлено: 28 янв 2021, 23:33
mit002
СКОТТ(дисперсия и среднее)
exIM <-read_excel("Вар6.xlsx", sheet=2)
# Scott
h <- ceiling(3.5 * sd(exIM$Выборка) / nrow(exIM)^(1/3))
x0 <- mean(exIM$Выборка)
sect_len <- (max(exIM$Выборка) - min(exIM$Выборка)) / h
Scott_group <- function(x, x0, sect_len){
a <- x - x0
a <- sign(x) * (abs(x) + sect_len/2)
group <- a / (sect_len)
return(trunc(group))
}
exIM$group <- Scott_group(exIM$Выборка, x0, sect_len)
exIM$group <- exIM$group - round(mean(exIM$group))
exIM$group <- factor(exIM$group)
result <- data.frame(row.names = c("mean", "var"))
for (grp in levels(exIM$group)){
result[1 ,grp] = mean(exIM$Выборка[exIM$group == grp])
result[2 ,grp] = var(exIM$Выборка[exIM$group == grp])
print(glue("Group {grp}"))
print(glue(" mean = {mean(exIM$Выборка[exIM$group == grp])}"))
print(glue(" var = {var(exIM$Выборка[exIM$group == grp])}"))
}
write.xlsx(result, file = 'exIM.xlsx')
Re: Сообщества, форумы, etc по языку R
Добавлено: 28 янв 2021, 23:36
mit002
Гамма распределение (Гипотеза)
exIM <-read_excel("Вар5.xlsx", sheet=4)
k <- mean(exIM$X)^2 / var(exIM$X)
theta <- var(exIM$X) / mean(exIM$X)
hist(rgamma(length(exIM$X), k, theta), breaks = 20)
hist(exIM$X, breaks = 20)
ks.test(exIM$X, "pgamma", k, theta)
# p-value = 2.2e-16 => гипотеза о гамма распределении отвергается!
Re: Сообщества, форумы, etc по языку R
Добавлено: 29 янв 2021, 09:54
gamm
что это и зачем это здесь? прием домашних заданий (да еще с ошибками) в другом месте
Re: Сообщества, форумы, etc по языку R
Добавлено: 12 авг 2021, 17:18
VistaSV30
Тут есть форум
https://www.cyberforum.ru/r/
Но там не очень живо идет общение