R version 3.0.1 (2013-05-16) -- "Good Sport" Copyright (C) 2013 The R Foundation for Statistical Computing Platform: x86_64-apple-darwin10.8.0 (64-bit) R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. Natural language support but running in an English locale R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. [R.app GUI 1.61 (6492) x86_64-apple-darwin10.8.0] [Workspace restored from /Users/zangsir/.RData] [History restored from /Users/zangsir/.Rapp.history] > white <- read.csv ("~/Dropbox/FALL2013/courses/data_mining/winequality-white.csv") > summary(white) fixed.acidity.volatile.acidity.citric.acid.residual.sugar.chlorides.free.sulfur.dioxide.total.sulfur.dioxide.density.pH.sulphates.alcohol.quality 7;0.15;0.28;14.7;0.051;29;149;0.99792;2.96;0.39;9;7 : 8 7.3;0.19;0.27;13.9;0.057;45;155;0.99807;2.94;0.41;8.8;8: 8 6.8;0.18;0.3;12.8;0.062;19;171;0.99808;3;0.52;9;7 : 7 7.4;0.16;0.3;13.7;0.056;33;168;0.99825;2.9;0.44;8.7;7 : 7 7.4;0.16;0.27;15.5;0.05;25;135;0.9984;2.9;0.43;8.7;7 : 6 7.4;0.19;0.3;12.8;0.053;48.5;229;0.9986;3.14;0.49;9.1;7: 6 (Other) :4856 > summary(iris) Sepal.Length Sepal.Width Petal.Length Petal.Width Species Min. :4.300 Min. :2.000 Min. :1.000 Min. :0.100 setosa :50 1st Qu.:5.100 1st Qu.:2.800 1st Qu.:1.600 1st Qu.:0.300 versicolor:50 Median :5.800 Median :3.000 Median :4.350 Median :1.300 virginica :50 Mean :5.843 Mean :3.057 Mean :3.758 Mean :1.199 3rd Qu.:6.400 3rd Qu.:3.300 3rd Qu.:5.100 3rd Qu.:1.800 Max. :7.900 Max. :4.400 Max. :6.900 Max. :2.500 > print(summary(white)) fixed.acidity.volatile.acidity.citric.acid.residual.sugar.chlorides.free.sulfur.dioxide.total.sulfur.dioxide.density.pH.sulphates.alcohol.quality 7;0.15;0.28;14.7;0.051;29;149;0.99792;2.96;0.39;9;7 : 8 7.3;0.19;0.27;13.9;0.057;45;155;0.99807;2.94;0.41;8.8;8: 8 6.8;0.18;0.3;12.8;0.062;19;171;0.99808;3;0.52;9;7 : 7 7.4;0.16;0.3;13.7;0.056;33;168;0.99825;2.9;0.44;8.7;7 : 7 7.4;0.16;0.27;15.5;0.05;25;135;0.9984;2.9;0.43;8.7;7 : 6 7.4;0.19;0.3;12.8;0.053;48.5;229;0.9986;3.14;0.49;9.1;7: 6 (Other) :4856 > white <- read.csv ("~/Downloads/winequality-white.csv") Error in file(file, "rt") : cannot open the connection In addition: Warning message: In file(file, "rt") : cannot open file '/Users/zangsir/Downloads/winequality-white.csv': No such file or directory > white <- read.csv ("~/Downloads/winequality-white(1).csv") > summary(white) fixed.acidity volatile.acidity citric.acid residual.sugar chlorides Min. : 3.800 Min. :0.0800 Min. :0.0000 Min. : 0.600 Min. :0.00900 1st Qu.: 6.300 1st Qu.:0.2100 1st Qu.:0.2700 1st Qu.: 1.700 1st Qu.:0.03600 Median : 6.800 Median :0.2600 Median :0.3200 Median : 5.200 Median :0.04300 Mean : 6.855 Mean :0.2782 Mean :0.3342 Mean : 6.391 Mean :0.04577 3rd Qu.: 7.300 3rd Qu.:0.3200 3rd Qu.:0.3900 3rd Qu.: 9.900 3rd Qu.:0.05000 Max. :14.200 Max. :1.1000 Max. :1.6600 Max. :65.800 Max. :0.34600 free.sulfur.dioxide total.sulfur.dioxide density pH sulphates Min. : 2.00 Min. : 9.0 Min. :0.9871 Min. :2.720 Min. :0.2200 1st Qu.: 23.00 1st Qu.:108.0 1st Qu.:0.9917 1st Qu.:3.090 1st Qu.:0.4100 Median : 34.00 Median :134.0 Median :0.9937 Median :3.180 Median :0.4700 Mean : 35.31 Mean :138.4 Mean :0.9940 Mean :3.188 Mean :0.4898 3rd Qu.: 46.00 3rd Qu.:167.0 3rd Qu.:0.9961 3rd Qu.:3.280 3rd Qu.:0.5500 Max. :289.00 Max. :440.0 Max. :1.0390 Max. :3.820 Max. :1.0800 alcohol quality Min. : 8.00 Min. :3.000 1st Qu.: 9.50 1st Qu.:5.000 Median :10.40 Median :6.000 Mean :10.51 Mean :5.878 3rd Qu.:11.40 3rd Qu.:6.000 Max. :14.20 Max. :9.000 > red <- read.csv ("~/Downloads/winequality-red(1).csv") Error in file(file, "rt") : cannot open the connection In addition: Warning message: In file(file, "rt") : cannot open file '/Users/zangsir/Downloads/winequality-red(1).csv': No such file or directory > red <- read.csv ("~/Downloads/winequality-red(1).csv") > summary(red) fixed.acidity volatile.acidity citric.acid residual.sugar chlorides Min. : 4.60 Min. :0.1200 Min. :0.000 Min. : 0.900 Min. :0.01200 1st Qu.: 7.10 1st Qu.:0.3900 1st Qu.:0.090 1st Qu.: 1.900 1st Qu.:0.07000 Median : 7.90 Median :0.5200 Median :0.260 Median : 2.200 Median :0.07900 Mean : 8.32 Mean :0.5278 Mean :0.271 Mean : 2.539 Mean :0.08747 3rd Qu.: 9.20 3rd Qu.:0.6400 3rd Qu.:0.420 3rd Qu.: 2.600 3rd Qu.:0.09000 Max. :15.90 Max. :1.5800 Max. :1.000 Max. :15.500 Max. :0.61100 free.sulfur.dioxide total.sulfur.dioxide density pH sulphates Min. : 1.00 Min. : 6.00 Min. :0.9901 Min. :2.740 Min. :0.3300 1st Qu.: 7.00 1st Qu.: 22.00 1st Qu.:0.9956 1st Qu.:3.210 1st Qu.:0.5500 Median :14.00 Median : 38.00 Median :0.9968 Median :3.310 Median :0.6200 Mean :15.87 Mean : 46.47 Mean :0.9967 Mean :3.311 Mean :0.6581 3rd Qu.:21.00 3rd Qu.: 62.00 3rd Qu.:0.9978 3rd Qu.:3.400 3rd Qu.:0.7300 Max. :72.00 Max. :289.00 Max. :1.0037 Max. :4.010 Max. :2.0000 alcohol quality Min. : 8.40 Min. :3.000 1st Qu.: 9.50 1st Qu.:5.000 Median :10.20 Median :6.000 Mean :10.42 Mean :5.636 3rd Qu.:11.10 3rd Qu.:6.000 Max. :14.90 Max. :8.000 > ?t starting httpd help server ... done > ?aggregate > ?[] Error: unexpected '[' in "?[" > m <- matrix(1:4, 2) > m [,1] [,2] [1,] 1 3 [2,] 2 4 > i <- matrix(c(1, 1, 2, 2), 2, byrow = TRUE) > > i [,1] [,2] [1,] 1 1 [2,] 2 2 > i <- matrix(c(1, 1, 2, 2), 4, byrow = TRUE) > i [,1] [1,] 1 [2,] 1 [3,] 2 [4,] 2 > m[i] [1] 1 1 2 2 > i <- matrix(c(1, 2, 3, 4), 4, byrow = TRUE) > m[i] [1] 1 2 3 4 > m <- matrix(1:8, 4) > m [,1] [,2] [1,] 1 5 [2,] 2 6 [3,] 3 7 [4,] 4 8 > m[i] [1] 1 2 3 4 > i <- matrix(c(1:8), 4, byrow = TRUE) > i [,1] [,2] [1,] 1 2 [2,] 3 4 [3,] 5 6 [4,] 7 8 > m[i] Error in m[i] : subscript out of bounds > i <- matrix(c(1:8), 4) > m[i] Error in m[i] : subscript out of bounds > i <- matrix(c(1:8), 8, byrow = TRUE) > m[i] [1] 1 2 3 4 5 6 7 8 > m <- matrix(10:17, 4) > m [,1] [,2] [1,] 10 14 [2,] 11 15 [3,] 12 16 [4,] 13 17 > m[i] [1] 10 11 12 13 14 15 16 17 > m <- matrix(10:19, 5) > m [,1] [,2] [1,] 10 15 [2,] 11 16 [3,] 12 17 [4,] 13 18 [5,] 14 19 > m[i] [1] 10 11 12 13 14 15 16 17 > i <- matrix(c(1:10), 10, byrow = TRUE) > m[i] [1] 10 11 12 13 14 15 16 17 18 19 > i [,1] [1,] 1 [2,] 2 [3,] 3 [4,] 4 [5,] 5 [6,] 6 [7,] 7 [8,] 8 [9,] 9 [10,] 10 > m <- matrix(10:18, 3) > m [,1] [,2] [,3] [1,] 10 13 16 [2,] 11 14 17 [3,] 12 15 18 > m[i] [1] 10 11 12 13 14 15 16 17 18 NA > i <- matrix(c(1:9), 3, byrow = TRUE) > i [,1] [,2] [,3] [1,] 1 2 3 [2,] 4 5 6 [3,] 7 8 9 > m[i] [1] 10 13 16 11 14 17 12 15 18 > i <- matrix(c(1:9), 3) > i [,1] [,2] [,3] [1,] 1 4 7 [2,] 2 5 8 [3,] 3 6 9 > m[i] [1] 10 11 12 13 14 15 16 17 18 > i <- matrix(c(10:18), 3) > i [,1] [,2] [,3] [1,] 10 13 16 [2,] 11 14 17 [3,] 12 15 18 > i <- matrix(c(20:28), 3) > i [,1] [,2] [,3] [1,] 20 23 26 [2,] 21 24 27 [3,] 22 25 28 > m[i] [1] NA NA NA NA NA NA NA NA NA > i <- matrix(c(10:18), 3) > i [,1] [,2] [,3] [1,] 10 13 16 [2,] 11 14 17 [3,] 12 15 18 > m[i] [1] NA NA NA NA NA NA NA NA NA > m <- matrix(1:4, 2) > > i <- matrix(c(1, 1, 2, 2), 2, byrow = TRUE) > m [,1] [,2] [1,] 1 3 [2,] 2 4 > i [,1] [,2] [1,] 1 1 [2,] 2 2 > m[1] [1] 1 > m[2] [1] 2 > m[i] [1] 1 4 > i <- matrix(c(1, 1, 4, 4), 2, byrow = TRUE) > i [,1] [,2] [1,] 1 1 [2,] 4 4 > i <- matrix(c(1, 2, 1, 2), 2, byrow = TRUE) > m[i] [1] 3 3 > m [,1] [,2] [1,] 1 3 [2,] 2 4 > i <- matrix(c(1, 2, 3, 4), 2, byrow = TRUE) > m[i] Error in m[i] : subscript out of bounds > i <- matrix(c(3, 3, 4, 4), 2, byrow = TRUE) > m[i] Error in m[i] : subscript out of bounds > m[3] [1] 3 > m[4] [1] 4 > i <- matrix(c(1, 2, 2, 1), 2, byrow = TRUE) > i [,1] [,2] [1,] 1 2 [2,] 2 1 > m[i] [1] 3 2 > i <- matrix(c(2, 1,1,2), 2, byrow = TRUE) > i [,1] [,2] [1,] 2 1 [2,] 1 2 > m[i] [1] 2 3 >