如何从数据集

Question

我需要选择大块的前20列 这里是代码

library(reshape2)
mydat=read.csv("C:/Users/synthex/Desktop/sales.csv", sep=";",dec=",")
df.sales.t <- acast(mydat, DAY ~ ART ~ STORE , value.var="SALES", fill=0)

但是，当我这样做时，我得到奇怪的结果，你可以在屏幕和结果上看到我的数据结构，当我选择前10列时，它显示如下： -

dput()
> g=as.data.frame(df.sales.t[,1,1:7])
> g
            956  958   961  974 980  999  1053
01.nov.15 108.0  0.0   0.0  0.0   0  0.0 216.0
02.nov.15   0.0  0.0  97.0  0.0   0  0.0   0.0
03.nov.15   0.0  0.0  97.0 99.9   0  0.0   0.0
04.nov.15 108.0  0.0  97.0  0.0   0  0.0 108.0
05.nov.15   0.0  0.0   0.0 99.9   0  0.0   0.0
06.nov.15 216.0  0.0  97.0  0.0 106  0.0   0.0
07.nov.15   0.0  0.0   0.0  0.0 106  0.0   0.0
08.nov.15   0.0 99.9  97.0  0.0   0  0.0 108.0
09.nov.15   0.0  0.0 194.0  0.0   0  0.0 108.0
10.nov.15   0.0  0.0   0.0  0.0 106 99.9   0.0

如何准确选择df.sales.t屏幕截图中的变量？

Answer 1

使用

mydat1 = df.sales.t
mydat1$rownames = row.names(mydat1)
rownames(mydat1) = NULL
colnames= colnames(mydat1) 
colnames(mydat1) = as.chracter(mydat1)
data <- mydat1[,1:20]