search for: pixel1

...l <- as.factor(dataset$label) # it has 42000 obs. 785 variables > str(dataset) 'data.frame': 42000 obs. of 785 variables: $ label : Factor w/ 10 levels "0","1","2","3",..: 2 1 2 5 1 1 8 4 6 4 ... $ pixel0 : int 0 0 0 0 0 0 0 0 0 0 ... $ pixel1 : int 0 0 0 0 0 0 0 0 0 0 ... $ pixel2 : int 0 0 0 0 0 0 0 0 0 0 ... [list output truncated] # I make a sampling testset and trainset > index <- 1:nrow(dataset) > testindex <- sample(index, trunc(length(index)*30/100)) > testset <- dataset[testindex,] > trainset <- d...