R csvからHistgramを作成

command

x <- read.csv("a1.csv")
hist(x[,"B"])

a1.csv

A,B
1,0
2,0
3,5
4,0
5,2
6,1
7,2
8,1
9,4