换位后避免整个矩阵的字符转换

Question

我有一个像这样的矩阵：

      Sample_1    Sample_2
Class LV          M                         
X1    481023.9    2352.3                         
X2    5018243     NA                         
X3    2607193     7234.5                         
X4    NA          823   

我用

阅读

X <- read.csv(file.choose(),header=T,row.names=1,stringsAsFactors=F)

由于第一行是characters，因此整个列都被视为这样。然后我需要转置矩阵，当我这样做时，整个矩阵仍被视为character，而我希望它为numeric。

我已经尝试过多种方法来解决这个问题，但它们都非常脏（例如我在csv上编写转置然后再读回来）。

我尝试过但没有成功：

xs <- as.data.frame(t(X),stringsAsFactors=F)  #1

xs <- t(X)                                    #2
xs <- data.frame(xs,stringsAsFactors=F)       

xs <- as.data.frame(t(X[-1,]))                #3 it doesn't work even excluding the infamous row!

你们中有谁有更好的选择吗？