How can I create a graph for R barplot

Question

I want to draw a graph of the mean by a value.

It's a statistic graph, and for this I made a list of each grade.

It used the "list" function to bring in each score and the average of each value using the "lapply" function.
But I tried to use it as a 'barlpot,' but the graph was not made properly.

I don't know if the graph format is wrong or what kind of mistake I made.

Code

list01 <-list(Sci=df_01$Sci,Eng = df_01$Eng,Math = df_01$Math)
C01_gd = lapply(list01,mean)

as.matrix(C01_gd)
barplot(as.matrix(C01_gd) ,border="white",beside = T)