error in need finite 'ylim' values

readxl
graphics

#1
> library(readxl)
> X <- read_excel("~/Desktop/term B/multivariance statistic anlysis/data for examples/mvstats4.xls",  sheet = "d3.1")
> View(X)
> barplot(apply(X,1,mean))
Error in plot.window(xlim, ylim, log = log, ...) : 
  need finite 'ylim' values
In addition: There were 33 warnings (use warnings() to see them)

I got error when I run this code line. I already checked my data, there is no NA value. I don't know what's wrong with it.