Получить график гистограмм фазовых частот (итоговый)

У меня есть фактор со многими разными значениями. Если вы выполняете summary(factor), вывод представляет собой список различных значений и их частоты. Например:

A B C D
3 3 1 5

Я хотел бы сделать гистограмму значений частоты, т.е. ось X содержит различные частоты, которые имеют место, ось Y - количество факторов, которые имеют эту конкретную частоту. Какой лучший способ выполнить что-то подобное?

edit: благодаря приведенному ниже ответу я понял, что я могу сделать, чтобы получить коэффициент частоты из таблицы, получить это в таблице и затем графически отобразить, что будет выглядеть (если f - коэффициент):

plot(factor(table(f)))

Ответы

Ответ 1

Обновление в свете уточненного Q

set.seed(1)
dat2 <- data.frame(fac = factor(sample(LETTERS, 100, replace = TRUE)))
hist(table(dat2), xlab = "Frequency of Level Occurrence", main = "")

дает:

histogram of frequency of occurrence in factor

Здесь мы просто применяем hist() непосредственно к результату table(dat). table(dat) обеспечивает частоты на уровень фактора и hist() создает гистограмму этих данных.

Оригинал

Существует несколько возможностей. Ваши данные:

dat <- data.frame(fac = rep(LETTERS[1:4], times = c(3,3,1,5)))

Вот три, начиная с первого столбца, сверху вниз:

  • Способы построения по умолчанию для класса "table", вырезают данные и гистограммные столбцы
  • Строка бар - это, вероятно, то, что вы имели в виду под гистограммой. Обратите внимание на низкое соотношение чернил и информации здесь.
  • Точечный график или диаграмма точек; показывает ту же информацию, что и другие графики, но использует гораздо меньше чернил на единицу информации. Предпочтительные.

Код для их создания:

layout(matrix(1:4, ncol = 2))
plot(table(dat), main = "plot method for class \"table\"")
barplot(table(dat), main = "barplot")
tab <- as.numeric(table(dat))
names(tab) <- names(table(dat))
dotchart(tab, main = "dotchart or dotplot")
## or just this
## dotchart(table(dat))
## and ignore the warning
layout(1)

это дает:

one dimensional plots

Если у вас есть только ваши данные в переменной factor (выбор неправильного имени кстати), то в моих примерах кода можно использовать table(factor), а не table(dat) или table(dat$fac).

Для полноты пакет lattice более гибкий, когда дело доходит до создания точечного графика, поскольку мы можем получить желаемую ориентацию:

require(lattice)
with(dat, dotplot(fac, horizontal = FALSE))

даяние:

Lattice dotplot version

И версия ggplot2:

require(ggplot2)
p <- ggplot(data.frame(Freq = tab, fac = names(tab)), aes(fac, Freq)) + 
    geom_point()
p

даяние:

ggplot2 version