在 R 中构建直方图
Building a histogram in R
下午好。最近我遇到了在 R 中构建直方图的问题。我输入:
Hist_SP500hist<-hist(SP500logreturns,col="lightblue",breaks = 140, border="white",main="", xlab="Time",xlim=c(-0.001,0.001))
这里我指定,中断数=140。
但是当我输入 Hist_SP500hist$breaks
时,我得到 179 次休息。
怎么会这样?
如果将其保存到对象,您可以手动调整 hist
中的中断。这是使用 faithful
数据集
的示例
注意:我没有足够的声誉来显示代码生成的图表
waiting.hist <- hist(faithful$waiting)
编辑:由于中断不会改变计数,因此您也必须更新计数。否则计数将被回收
waiting.hist$breaks <- seq(40, 100, 2.5)
waiting.hist$counts <- table(cut(faithful$waiting, seq(40, 100, 2.5)))
plot(waiting.hist)
或者您可以使用 ggplot2 并使用 bins
或 binwidth
指定中断
library(tidyverse)
#> Warning: package 'tidyverse' was built under R version 3.6.3
#> Warning: package 'ggplot2' was built under R version 3.6.3
#> Warning: package 'tibble' was built under R version 3.6.3
#> Warning: package 'tidyr' was built under R version 3.6.3
#> Warning: package 'purrr' was built under R version 3.6.3
#> Warning: package 'dplyr' was built under R version 3.6.3
#> Warning: package 'forcats' was built under R version 3.6.3
faithful %>%
ggplot(aes(x = waiting)) +
geom_histogram(bins = 30)
faithful %>%
ggplot(aes(x = waiting)) +
geom_histogram(binwidth = 2.5)
由 reprex package (v0.3.0)
于 2020-09-05 创建
下午好。最近我遇到了在 R 中构建直方图的问题。我输入:
Hist_SP500hist<-hist(SP500logreturns,col="lightblue",breaks = 140, border="white",main="", xlab="Time",xlim=c(-0.001,0.001))
这里我指定,中断数=140。
但是当我输入 Hist_SP500hist$breaks
时,我得到 179 次休息。
怎么会这样?
如果将其保存到对象,您可以手动调整 hist
中的中断。这是使用 faithful
数据集
注意:我没有足够的声誉来显示代码生成的图表
waiting.hist <- hist(faithful$waiting)
编辑:由于中断不会改变计数,因此您也必须更新计数。否则计数将被回收
waiting.hist$breaks <- seq(40, 100, 2.5)
waiting.hist$counts <- table(cut(faithful$waiting, seq(40, 100, 2.5)))
plot(waiting.hist)
或者您可以使用 ggplot2 并使用 bins
或 binwidth
library(tidyverse)
#> Warning: package 'tidyverse' was built under R version 3.6.3
#> Warning: package 'ggplot2' was built under R version 3.6.3
#> Warning: package 'tibble' was built under R version 3.6.3
#> Warning: package 'tidyr' was built under R version 3.6.3
#> Warning: package 'purrr' was built under R version 3.6.3
#> Warning: package 'dplyr' was built under R version 3.6.3
#> Warning: package 'forcats' was built under R version 3.6.3
faithful %>%
ggplot(aes(x = waiting)) +
geom_histogram(bins = 30)
faithful %>%
ggplot(aes(x = waiting)) +
geom_histogram(binwidth = 2.5)
由 reprex package (v0.3.0)
于 2020-09-05 创建