R R  ·  30 вопросов  ·  ~85 мин  ·  ⏱ Таймер 25:00  ·  Сложный  · 

Аудит аналитического проекта

Проверка охватывает код, данные и интерпретацию результата как единое решение. В тесте «Аудит аналитического проекта» рассматриваются Воспроизводимый отчёт, Версии данных, Проверка выводов, Коммуникация неопределённости, Проверка допущений и качества и Воспроизводимость и интерпретация. Нужно предсказывать структуру результата, находить скрытые риски, выбирать исправление и доказывать его проверкой. Из 30 вопросов 18 содержат код; остальные описывают ситуации, в которых синтаксически допустимое решение может привести к неверному аналитическому выводу.

Отвечено: 0 из 30
--:--
0%
💡 Инструкция: Выберите один ответ из пяти. На 30 вопросов отведено 85 минут. Читайте код построчно, учитывайте типы, атрибуты, пропуски и допущения анализа. После завершения откроются общий процент, 6 тематических шкал и объяснение к каждому заданию.
Вопрос 1 из 30
Ситуация: Графики пересчитаны, но цифры в абзацах остались скопированными из прошлой версии. Какое правило нужно применить к этому фрагменту прежде всего?
RФрагмент R
result <- list(input='data/raw.csv', report='report.qmd', generated=Sys.time(), session=sessionInfo())
result
Вопрос 2 из 30
Ситуация: Графики пересчитаны, но цифры в абзацах остались скопированными из прошлой версии. Что в этой ситуации способно исказить вывод без явной синтаксической ошибки?
RФрагмент R
result <- list(input='data/raw.csv', report='report.qmd', generated=Sys.time(), session=sessionInfo())
result
Вопрос 3 из 30
Ситуация: Графики пересчитаны, но цифры в абзацах остались скопированными из прошлой версии. Что следует изменить в коде или процессе?
Вопрос 4 из 30
Ситуация: Графики пересчитаны, но цифры в абзацах остались скопированными из прошлой версии. Какой тест лучше всего ловит повтор этой ошибки?
Вопрос 5 из 30
Ситуация: Графики пересчитаны, но цифры в абзацах остались скопированными из прошлой версии. Как сформулировать вывод без лишних обобщений?
RФрагмент R
result <- list(input='data/raw.csv', report='report.qmd', generated=Sys.time(), session=sessionInfo())
result
Вопрос 6 из 30
Ситуация: Источник ежедневно обновляет файл под тем же именем, а в отчёте не указано, какой снимок использован. Какой механизм точнее всего объясняет связь кода с ситуацией?
RФрагмент R
f <- tempfile(); write.csv(mtcars,f,row.names=FALSE)
result <- tools::md5sum(f)
result
Вопрос 7 из 30
Ситуация: Источник ежедневно обновляет файл под тем же именем, а в отчёте не указано, какой снимок использован. Какой дефект нужно искать в первую очередь?
RФрагмент R
f <- tempfile(); write.csv(mtcars,f,row.names=FALSE)
result <- tools::md5sum(f)
result
Вопрос 8 из 30
Ситуация: Источник ежедневно обновляет файл под тем же именем, а в отчёте не указано, какой снимок использован. Какой вариант исправления сохраняет смысл анализа?
Вопрос 9 из 30
Ситуация: Источник ежедневно обновляет файл под тем же именем, а в отчёте не указано, какой снимок использован. Какая проверка относится к исходному риску, а не к внешнему виду результата?
Вопрос 10 из 30
Ситуация: Источник ежедневно обновляет файл под тем же именем, а в отчёте не указано, какой снимок использован. Какое заключение лучше всего выдерживает проверку?
RФрагмент R
f <- tempfile(); write.csv(mtcars,f,row.names=FALSE)
result <- tools::md5sum(f)
result
Вопрос 11 из 30
Ситуация: Интервал включает ноль, но резюме утверждает, что метод гарантированно улучшает результат. На какое свойство R здесь следует опереться?
RФрагмент R
estimate <- .04; ci <- c(-.01,.09)
result <- list(estimate=estimate, ci=ci, claim='эффект доказан')
result
Вопрос 12 из 30
Ситуация: Интервал включает ноль, но резюме утверждает, что метод гарантированно улучшает результат. Почему успешный запуск ещё не доказывает корректность?
RФрагмент R
estimate <- .04; ci <- c(-.01,.09)
result <- list(estimate=estimate, ci=ci, claim='эффект доказан')
result
Вопрос 13 из 30
Ситуация: Интервал включает ноль, но резюме утверждает, что метод гарантированно улучшает результат. Какая правка лучше локальной заплатки?
Вопрос 14 из 30
Ситуация: Интервал включает ноль, но резюме утверждает, что метод гарантированно улучшает результат. Как подтвердить корректность на граничном случае?
Вопрос 15 из 30
Ситуация: Интервал включает ноль, но резюме утверждает, что метод гарантированно улучшает результат. Какой вывод точнее всего связывает механизм и главный риск?
RФрагмент R
estimate <- .04; ci <- c(-.01,.09)
result <- list(estimate=estimate, ci=ci, claim='эффект доказан')
result
Вопрос 16 из 30
Ситуация: Прогноз 62,384% публикуют без интервала, хотя выборки допускают значения от 51% до 74%. Какое утверждение лучше всего объясняет показанный фрагмент?
RФрагмент R
estimate <- .62384; ci <- c(.51,.74)
result <- sprintf('%.4f [%.2f; %.2f]',estimate,ci[1],ci[2])
result
Вопрос 17 из 30
Ситуация: Прогноз 62,384% публикуют без интервала, хотя выборки допускают значения от 51% до 74%. Какое скрытое допущение здесь опаснее остальных?
RФрагмент R
estimate <- .62384; ci <- c(.51,.74)
result <- sprintf('%.4f [%.2f; %.2f]',estimate,ci[1],ci[2])
result
Вопрос 18 из 30
Ситуация: Прогноз 62,384% публикуют без интервала, хотя выборки допускают значения от 51% до 74%. Что нужно сделать, чтобы ошибка не вернулась на следующем наборе данных?
Вопрос 19 из 30
Ситуация: Прогноз 62,384% публикуют без интервала, хотя выборки допускают значения от 51% до 74%. Какая проверка непосредственно подтверждает, что дефект устранён?
Вопрос 20 из 30
Ситуация: Прогноз 62,384% публикуют без интервала, хотя выборки допускают значения от 51% до 74%. Что стоит написать в технической рецензии к этому фрагменту?
RФрагмент R
estimate <- .62384; ci <- c(.51,.74)
result <- sprintf('%.4f [%.2f; %.2f]',estimate,ci[1],ci[2])
result
Вопрос 21 из 30
Ситуация: Конвейер зелёный, но двойная загрузка одной строки завышает итоговую сумму. Что является главным техническим основанием для разбора?
RФрагмент R
df <- data.frame(id=c(1,2,2), value=c(10,20,20))
result <- list(rows=nrow(df), unique_id=length(unique(df$id)), total=sum(df$value))
result
Вопрос 22 из 30
Ситуация: Конвейер зелёный, но двойная загрузка одной строки завышает итоговую сумму. Что именно может сломаться при новых данных?
RФрагмент R
df <- data.frame(id=c(1,2,2), value=c(10,20,20))
result <- list(rows=nrow(df), unique_id=length(unique(df$id)), total=sum(df$value))
result
Вопрос 23 из 30
Ситуация: Конвейер зелёный, но двойная загрузка одной строки завышает итоговую сумму. Какое изменение устраняет именно причину проблемы?
Вопрос 24 из 30
Ситуация: Конвейер зелёный, но двойная загрузка одной строки завышает итоговую сумму. Какой контроль отличит исправление от случайно удачного результата?
Вопрос 25 из 30
Ситуация: Конвейер зелёный, но двойная загрузка одной строки завышает итоговую сумму. Какое заключение останется верным и на новых данных?
RФрагмент R
df <- data.frame(id=c(1,2,2), value=c(10,20,20))
result <- list(rows=nrow(df), unique_id=length(unique(df$id)), total=sum(df$value))
result
Вопрос 26 из 30
Ситуация: Через полгода команда видит красивый отчёт, но не знает версии пакетов, исходный срез и команды построения. Какой принцип непосредственно относится к этому коду?
RФрагмент R
result <- list(files=c('README.md','renv.lock','data_manifest.csv','report.qmd','tests/testthat'))
result
Вопрос 27 из 30
Ситуация: Через полгода команда видит красивый отчёт, но не знает версии пакетов, исходный срез и команды построения. Какой риск здесь остаётся главным, даже если результат выглядит правдоподобно?
RФрагмент R
result <- list(files=c('README.md','renv.lock','data_manifest.csv','report.qmd','tests/testthat'))
result
Вопрос 28 из 30
Ситуация: Через полгода команда видит красивый отчёт, но не знает версии пакетов, исходный срез и команды построения. Какая правка делает решение устойчивым, а не просто удобным на текущем примере?
Вопрос 29 из 30
Ситуация: Через полгода команда видит красивый отчёт, но не знает версии пакетов, исходный срез и команды построения. Что нужно проверить после правки?
Вопрос 30 из 30
Ситуация: Через полгода команда видит красивый отчёт, но не знает версии пакетов, исходный срез и команды построения. Какой итог разбора не смешивает правило языка с впечатлением от результата?
RФрагмент R
result <- list(files=c('README.md','renv.lock','data_manifest.csv','report.qmd','tests/testthat'))
result

Ответьте на все 30 вопросов, чтобы получить результат

🔗 Встроить тест на свой сайт (iframe)

Скопируйте код и вставьте в любое место на вашем сайте:

Также доступна прямая ссылка на embed-страницу