プロットパフォーマンスMSE、RMSE

Question

このデータフレームは、以下で説明するように、4つのメソッドと3つのパフォーマンス測定値で構成されています。しかし、私はggplotまたは類似した何かでこれを取得することはできませんよ

   Method  MSE RMSE MAE 
      Baseline 42674.68 206.58 149.96 
    Linear Regression 10738.56 103.63 55.85 
     Random forest 4492.47 67.03 37.29 
     Neural Network 7650.72 87.47 57.50 

：私はこれと同様の各メソッドのbarplotを持っていると思います。誰か助けてくれますか？私たちはあなたのデータフレームを再構築する必要があるデータで

Answer 1

まず読み取り

dd = read.table(textConnection("Method MSE RMSE MAE 
Baseline 42674.68 206.58 149.96 
LinearRegression 10738.56 103.63 55.85 
Randomforest 4492.47 67.03 37.29 
NeuralNetwork 7650.72 87.47 57.50"), header=TRUE) 

次は、その後、我々が使用reshape2

dd_m = reshape2::melt(dd, c("Method")) 

head(dd_m, 2) 
#   Method variable value 
#1   Baseline  MSE 42675 
#2 LinearRegression  MSE 10739 

使用して優しいggplot2するgeom_bar

library(ggplot2) 
ggplot(dd_m) + 
    geom_bar(aes(x=variable, y=value, fill=Method), 
       stat="identity", # Don't transform the data 
       position = "dodge") # Dodge the bars