Sample (), чем сделать фрейм данных. р

Question

Я хочу сделать выборку 100 раз (с заменой) из чисел от 1 до 20, используя sample (), затем превратить эти данные во фрейм данных и визуализировать их.

df <- sample(1:20, 100, replace=TRUE)
df <- as.data.frame(df)
ggplot(df, aes(x= df, y= n)) + geom_bar(position = "fill")

пытается найти лучший способ превратить данные sample () во фрейм данных. Спасибо

Answer 1

Не уверен, что вы подразумеваете под лучшим способом, но я думаю, вы могли бы сделать

library(ggplot2)
df <- data.frame(x = sample(1:20, 100, replace=TRUE))
ggplot(df, aes(x)) + geom_bar()

Или использовать его напрямую

ggplot(data.frame(x = sample(1:20, 100, replace=TRUE)), aes(x)) + geom_bar()

Answer 2

Лучшим вариантом было бы использовать tidyverse

library(dplyr)
library(ggplot2)
tibble(x = sample(1:20, 100, replace = TRUE)) %>%
      ggplot(aes(x)) + 
      geom_bar()

---

В base R, мы можем сделать это без создания data.frame

barplot(sample(1:20, 100, replace = TRUE))