R でhist(x) 関数でヒストグラムを描けない（ 'x' は数値でなければなりません とエラーを返す）


Rで，以下のようなコードで 関数を作り，その結果をヒストグラムにしたいのですが， 'x' は数値でなければなりません とエラーを返してきてうまくいきません．
助けてください．

[code]

    func01 = function(n){
    sample1 <- 100
    df1 = data.frame()
    for(i in 1:n){
    sample1 <- sample1+1000
    df1 <- rbind(df1, sample1)
    }
    return(df1)
    }
    func01(5)
    a<-func01(5)
    hist(a)
    
    
[/code]




aは5行1列のデータフレームですからとりあえず1列目を指定しました。  
histとbarplotを表示してみました。

a<-func01(5)  
hist(a[,1])  
barplot(a[,1])

[![画像の説明をここに入力](https://i.stack.imgur.com/w9DEP.png)](https://i.stack.imgur.com/w9DEP.png)




aは5行1列のデータフレームですからとりあえず1列目を指定しました。  
histとbarplotを表示してみました。

a<-func01(5)  
hist(a[,1])  
barplot(a[,1])

[![画像の説明をここに入力](https://i.stack.imgur.com/w9DEP.png)](https://i.stack.imgur.com/w9DEP.png)

