Displaying 1 result from an estimated 1 matches for "cleaner_type_1".
2008 Aug 07
3
Create new dataframes with dames from dataset...
...tform
cleaner_1 <- data_variable[row_vector,] #store it in
cleaner_1
Motor <- sort(unique(cleaner_1[,5])) # find all motors for
platform 1 sorted
for(i in 1: length(Motor)){
row_vector <- which(cleaner_1[,5]==Motor[i]) # find the
first motor
cleaner_type_1 <- cleaner_1[row_vector,] # store it in
cleaner_type_1
Data_x <-cleaner_type_1[9]
Data_y <-cleaner_type_1[10]
hist(Data_x[,], probability=TRUE, breaks=5, main=data_header[9])
savePlot(filename = paste(c("C:/pow",j,"_",i), collapse="...