rm(list=ls())
ls()
## character(0)
getwd()
## [1] "C:/R"
setwd("c://R")
mpg1<-read.csv("mpg1.csv")
mpg1<-read.csv("mpg1.csv", stringsAsFactors = T)
mpg1<-read.csv("mpg1.csv")
str(mpg1)
## 'data.frame': 234 obs. of 5 variables:
## $ manufacturer: chr "audi" "audi" "audi" "audi" ...
## $ trans : chr "auto" "manual" "manual" "auto" ...
## $ drv : chr "f" "f" "f" "f" ...
## $ cty : int 18 21 20 21 16 18 18 18 16 20 ...
## $ hwy : int 29 29 31 30 26 26 27 26 25 28 ...
library(tidyverse)
## -- Attaching packages --------------------------------------- tidyverse 1.3.1 --
## v ggplot2 3.3.5 v purrr 0.3.4
## v tibble 3.1.6 v dplyr 1.0.8
## v tidyr 1.2.0 v stringr 1.4.0
## v readr 2.1.2 v forcats 0.5.1
## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag() masks stats::lag()
mpg1_newname1<-mpg1 %>%
rename(tramsmisson=trans,
drive_method=drv,
city=cty,
highway=hwy)
mpg1_1<-mpg1 %>% select(1,2,4)
head(mpg1_1)
## manufacturer trans cty
## 1 audi auto 18
## 2 audi manual 21
## 3 audi manual 20
## 4 audi auto 21
## 5 audi auto 16
## 6 audi manual 18
mpg1 %>% select(1,2,4)
## manufacturer trans cty
## 1 audi auto 18
## 2 audi manual 21
## 3 audi manual 20
## 4 audi auto 21
## 5 audi auto 16
## 6 audi manual 18
## 7 audi auto 18
## 8 audi manual 18
## 9 audi auto 16
## 10 audi manual 20
## 11 audi auto 19
## 12 audi auto 15
## 13 audi manual 17
## 14 audi auto 17
## 15 audi manual 15
## 16 audi auto 15
## 17 audi auto 17
## 18 audi auto 16
## 19 chevrolet auto 14
## 20 chevrolet auto 11
## 21 chevrolet auto 14
## 22 chevrolet auto 13
## 23 chevrolet auto 12
## 24 chevrolet manual 16
## 25 chevrolet auto 15
## 26 chevrolet manual 16
## 27 chevrolet auto 15
## 28 chevrolet manual 15
## 29 chevrolet auto 14
## 30 chevrolet auto 11
## 31 chevrolet auto 11
## 32 chevrolet auto 14
## 33 chevrolet auto 19
## 34 chevrolet auto 22
## 35 chevrolet auto 18
## 36 chevrolet auto 18
## 37 chevrolet auto 17
## 38 dodge auto 18
## 39 dodge auto 17
## 40 dodge auto 16
## 41 dodge auto 16
## 42 dodge auto 17
## 43 dodge auto 17
## 44 dodge auto 11
## 45 dodge auto 15
## 46 dodge auto 15
## 47 dodge auto 16
## 48 dodge auto 16
## 49 dodge manual 15
## 50 dodge auto 14
## 51 dodge auto 13
## 52 dodge manual 14
## 53 dodge auto 14
## 54 dodge auto 14
## 55 dodge auto 9
## 56 dodge manual 11
## 57 dodge auto 11
## 58 dodge auto 13
## 59 dodge auto 13
## 60 dodge auto 9
## 61 dodge auto 13
## 62 dodge auto 11
## 63 dodge auto 13
## 64 dodge auto 11
## 65 dodge manual 12
## 66 dodge auto 9
## 67 dodge auto 13
## 68 dodge auto 13
## 69 dodge manual 12
## 70 dodge manual 9
## 71 dodge auto 11
## 72 dodge manual 11
## 73 dodge auto 13
## 74 dodge auto 11
## 75 ford auto 11
## 76 ford auto 11
## 77 ford auto 12
## 78 ford auto 14
## 79 ford manual 15
## 80 ford auto 14
## 81 ford auto 13
## 82 ford auto 13
## 83 ford auto 13
## 84 ford auto 14
## 85 ford manual 14
## 86 ford manual 13
## 87 ford auto 13
## 88 ford auto 13
## 89 ford auto 11
## 90 ford auto 13
## 91 ford manual 18
## 92 ford auto 18
## 93 ford manual 17
## 94 ford auto 16
## 95 ford auto 15
## 96 ford manual 15
## 97 ford manual 15
## 98 ford auto 15
## 99 ford manual 14
## 100 honda manual 28
## 101 honda auto 24
## 102 honda manual 25
## 103 honda manual 23
## 104 honda auto 24
## 105 honda manual 26
## 106 honda auto 25
## 107 honda auto 24
## 108 honda manual 21
## 109 hyundai auto 18
## 110 hyundai manual 18
## 111 hyundai auto 21
## 112 hyundai manual 21
## 113 hyundai auto 18
## 114 hyundai manual 18
## 115 hyundai auto 19
## 116 hyundai auto 19
## 117 hyundai manual 19
## 118 hyundai manual 20
## 119 hyundai auto 20
## 120 hyundai auto 17
## 121 hyundai manual 16
## 122 hyundai manual 17
## 123 jeep auto 17
## 124 jeep auto 15
## 125 jeep auto 15
## 126 jeep auto 14
## 127 jeep auto 9
## 128 jeep auto 14
## 129 jeep auto 13
## 130 jeep auto 11
## 131 land rover auto 11
## 132 land rover auto 12
## 133 land rover auto 12
## 134 land rover auto 11
## 135 lincoln auto 11
## 136 lincoln auto 11
## 137 lincoln auto 12
## 138 mercury auto 14
## 139 mercury auto 13
## 140 mercury auto 13
## 141 mercury auto 13
## 142 nissan manual 21
## 143 nissan auto 19
## 144 nissan auto 23
## 145 nissan manual 23
## 146 nissan manual 19
## 147 nissan auto 19
## 148 nissan auto 18
## 149 nissan manual 19
## 150 nissan auto 19
## 151 nissan auto 14
## 152 nissan manual 15
## 153 nissan auto 14
## 154 nissan auto 12
## 155 pontiac auto 18
## 156 pontiac auto 16
## 157 pontiac auto 17
## 158 pontiac auto 18
## 159 pontiac auto 16
## 160 subaru manual 18
## 161 subaru auto 18
## 162 subaru manual 20
## 163 subaru manual 19
## 164 subaru auto 20
## 165 subaru auto 18
## 166 subaru auto 21
## 167 subaru manual 19
## 168 subaru manual 19
## 169 subaru auto 19
## 170 subaru auto 20
## 171 subaru auto 20
## 172 subaru manual 19
## 173 subaru manual 20
## 174 toyota manual 15
## 175 toyota auto 16
## 176 toyota auto 15
## 177 toyota manual 15
## 178 toyota auto 16
## 179 toyota auto 14
## 180 toyota manual 21
## 181 toyota auto 21
## 182 toyota manual 21
## 183 toyota auto 21
## 184 toyota auto 18
## 185 toyota manual 18
## 186 toyota auto 19
## 187 toyota auto 21
## 188 toyota manual 21
## 189 toyota manual 21
## 190 toyota auto 22
## 191 toyota auto 18
## 192 toyota manual 18
## 193 toyota auto 18
## 194 toyota auto 24
## 195 toyota auto 24
## 196 toyota manual 26
## 197 toyota manual 28
## 198 toyota auto 26
## 199 toyota auto 11
## 200 toyota auto 13
## 201 toyota manual 15
## 202 toyota auto 16
## 203 toyota manual 17
## 204 toyota manual 15
## 205 toyota auto 15
## 206 toyota manual 15
## 207 toyota auto 16
## 208 volkswagen manual 21
## 209 volkswagen auto 19
## 210 volkswagen manual 21
## 211 volkswagen auto 22
## 212 volkswagen manual 17
## 213 volkswagen manual 33
## 214 volkswagen manual 21
## 215 volkswagen auto 19
## 216 volkswagen auto 22
## 217 volkswagen manual 21
## 218 volkswagen auto 21
## 219 volkswagen manual 21
## 220 volkswagen auto 16
## 221 volkswagen manual 17
## 222 volkswagen manual 35
## 223 volkswagen auto 29
## 224 volkswagen manual 21
## 225 volkswagen auto 19
## 226 volkswagen manual 20
## 227 volkswagen auto 20
## 228 volkswagen manual 21
## 229 volkswagen auto 18
## 230 volkswagen auto 19
## 231 volkswagen manual 21
## 232 volkswagen auto 16
## 233 volkswagen manual 18
## 234 volkswagen auto 17
mpg1 %>% select(manufacturer,trans,cty)
## manufacturer trans cty
## 1 audi auto 18
## 2 audi manual 21
## 3 audi manual 20
## 4 audi auto 21
## 5 audi auto 16
## 6 audi manual 18
## 7 audi auto 18
## 8 audi manual 18
## 9 audi auto 16
## 10 audi manual 20
## 11 audi auto 19
## 12 audi auto 15
## 13 audi manual 17
## 14 audi auto 17
## 15 audi manual 15
## 16 audi auto 15
## 17 audi auto 17
## 18 audi auto 16
## 19 chevrolet auto 14
## 20 chevrolet auto 11
## 21 chevrolet auto 14
## 22 chevrolet auto 13
## 23 chevrolet auto 12
## 24 chevrolet manual 16
## 25 chevrolet auto 15
## 26 chevrolet manual 16
## 27 chevrolet auto 15
## 28 chevrolet manual 15
## 29 chevrolet auto 14
## 30 chevrolet auto 11
## 31 chevrolet auto 11
## 32 chevrolet auto 14
## 33 chevrolet auto 19
## 34 chevrolet auto 22
## 35 chevrolet auto 18
## 36 chevrolet auto 18
## 37 chevrolet auto 17
## 38 dodge auto 18
## 39 dodge auto 17
## 40 dodge auto 16
## 41 dodge auto 16
## 42 dodge auto 17
## 43 dodge auto 17
## 44 dodge auto 11
## 45 dodge auto 15
## 46 dodge auto 15
## 47 dodge auto 16
## 48 dodge auto 16
## 49 dodge manual 15
## 50 dodge auto 14
## 51 dodge auto 13
## 52 dodge manual 14
## 53 dodge auto 14
## 54 dodge auto 14
## 55 dodge auto 9
## 56 dodge manual 11
## 57 dodge auto 11
## 58 dodge auto 13
## 59 dodge auto 13
## 60 dodge auto 9
## 61 dodge auto 13
## 62 dodge auto 11
## 63 dodge auto 13
## 64 dodge auto 11
## 65 dodge manual 12
## 66 dodge auto 9
## 67 dodge auto 13
## 68 dodge auto 13
## 69 dodge manual 12
## 70 dodge manual 9
## 71 dodge auto 11
## 72 dodge manual 11
## 73 dodge auto 13
## 74 dodge auto 11
## 75 ford auto 11
## 76 ford auto 11
## 77 ford auto 12
## 78 ford auto 14
## 79 ford manual 15
## 80 ford auto 14
## 81 ford auto 13
## 82 ford auto 13
## 83 ford auto 13
## 84 ford auto 14
## 85 ford manual 14
## 86 ford manual 13
## 87 ford auto 13
## 88 ford auto 13
## 89 ford auto 11
## 90 ford auto 13
## 91 ford manual 18
## 92 ford auto 18
## 93 ford manual 17
## 94 ford auto 16
## 95 ford auto 15
## 96 ford manual 15
## 97 ford manual 15
## 98 ford auto 15
## 99 ford manual 14
## 100 honda manual 28
## 101 honda auto 24
## 102 honda manual 25
## 103 honda manual 23
## 104 honda auto 24
## 105 honda manual 26
## 106 honda auto 25
## 107 honda auto 24
## 108 honda manual 21
## 109 hyundai auto 18
## 110 hyundai manual 18
## 111 hyundai auto 21
## 112 hyundai manual 21
## 113 hyundai auto 18
## 114 hyundai manual 18
## 115 hyundai auto 19
## 116 hyundai auto 19
## 117 hyundai manual 19
## 118 hyundai manual 20
## 119 hyundai auto 20
## 120 hyundai auto 17
## 121 hyundai manual 16
## 122 hyundai manual 17
## 123 jeep auto 17
## 124 jeep auto 15
## 125 jeep auto 15
## 126 jeep auto 14
## 127 jeep auto 9
## 128 jeep auto 14
## 129 jeep auto 13
## 130 jeep auto 11
## 131 land rover auto 11
## 132 land rover auto 12
## 133 land rover auto 12
## 134 land rover auto 11
## 135 lincoln auto 11
## 136 lincoln auto 11
## 137 lincoln auto 12
## 138 mercury auto 14
## 139 mercury auto 13
## 140 mercury auto 13
## 141 mercury auto 13
## 142 nissan manual 21
## 143 nissan auto 19
## 144 nissan auto 23
## 145 nissan manual 23
## 146 nissan manual 19
## 147 nissan auto 19
## 148 nissan auto 18
## 149 nissan manual 19
## 150 nissan auto 19
## 151 nissan auto 14
## 152 nissan manual 15
## 153 nissan auto 14
## 154 nissan auto 12
## 155 pontiac auto 18
## 156 pontiac auto 16
## 157 pontiac auto 17
## 158 pontiac auto 18
## 159 pontiac auto 16
## 160 subaru manual 18
## 161 subaru auto 18
## 162 subaru manual 20
## 163 subaru manual 19
## 164 subaru auto 20
## 165 subaru auto 18
## 166 subaru auto 21
## 167 subaru manual 19
## 168 subaru manual 19
## 169 subaru auto 19
## 170 subaru auto 20
## 171 subaru auto 20
## 172 subaru manual 19
## 173 subaru manual 20
## 174 toyota manual 15
## 175 toyota auto 16
## 176 toyota auto 15
## 177 toyota manual 15
## 178 toyota auto 16
## 179 toyota auto 14
## 180 toyota manual 21
## 181 toyota auto 21
## 182 toyota manual 21
## 183 toyota auto 21
## 184 toyota auto 18
## 185 toyota manual 18
## 186 toyota auto 19
## 187 toyota auto 21
## 188 toyota manual 21
## 189 toyota manual 21
## 190 toyota auto 22
## 191 toyota auto 18
## 192 toyota manual 18
## 193 toyota auto 18
## 194 toyota auto 24
## 195 toyota auto 24
## 196 toyota manual 26
## 197 toyota manual 28
## 198 toyota auto 26
## 199 toyota auto 11
## 200 toyota auto 13
## 201 toyota manual 15
## 202 toyota auto 16
## 203 toyota manual 17
## 204 toyota manual 15
## 205 toyota auto 15
## 206 toyota manual 15
## 207 toyota auto 16
## 208 volkswagen manual 21
## 209 volkswagen auto 19
## 210 volkswagen manual 21
## 211 volkswagen auto 22
## 212 volkswagen manual 17
## 213 volkswagen manual 33
## 214 volkswagen manual 21
## 215 volkswagen auto 19
## 216 volkswagen auto 22
## 217 volkswagen manual 21
## 218 volkswagen auto 21
## 219 volkswagen manual 21
## 220 volkswagen auto 16
## 221 volkswagen manual 17
## 222 volkswagen manual 35
## 223 volkswagen auto 29
## 224 volkswagen manual 21
## 225 volkswagen auto 19
## 226 volkswagen manual 20
## 227 volkswagen auto 20
## 228 volkswagen manual 21
## 229 volkswagen auto 18
## 230 volkswagen auto 19
## 231 volkswagen manual 21
## 232 volkswagen auto 16
## 233 volkswagen manual 18
## 234 volkswagen auto 17
mpg1 %>% select(-trans)
## manufacturer drv cty hwy
## 1 audi f 18 29
## 2 audi f 21 29
## 3 audi f 20 31
## 4 audi f 21 30
## 5 audi f 16 26
## 6 audi f 18 26
## 7 audi f 18 27
## 8 audi 4 18 26
## 9 audi 4 16 25
## 10 audi 4 20 28
## 11 audi 4 19 27
## 12 audi 4 15 25
## 13 audi 4 17 25
## 14 audi 4 17 25
## 15 audi 4 15 25
## 16 audi 4 15 24
## 17 audi 4 17 25
## 18 audi 4 16 23
## 19 chevrolet r 14 20
## 20 chevrolet r 11 15
## 21 chevrolet r 14 20
## 22 chevrolet r 13 17
## 23 chevrolet r 12 17
## 24 chevrolet r 16 26
## 25 chevrolet r 15 23
## 26 chevrolet r 16 26
## 27 chevrolet r 15 25
## 28 chevrolet r 15 24
## 29 chevrolet 4 14 19
## 30 chevrolet 4 11 14
## 31 chevrolet 4 11 15
## 32 chevrolet 4 14 17
## 33 chevrolet f 19 27
## 34 chevrolet f 22 30
## 35 chevrolet f 18 26
## 36 chevrolet f 18 29
## 37 chevrolet f 17 26
## 38 dodge f 18 24
## 39 dodge f 17 24
## 40 dodge f 16 22
## 41 dodge f 16 22
## 42 dodge f 17 24
## 43 dodge f 17 24
## 44 dodge f 11 17
## 45 dodge f 15 22
## 46 dodge f 15 21
## 47 dodge f 16 23
## 48 dodge f 16 23
## 49 dodge 4 15 19
## 50 dodge 4 14 18
## 51 dodge 4 13 17
## 52 dodge 4 14 17
## 53 dodge 4 14 19
## 54 dodge 4 14 19
## 55 dodge 4 9 12
## 56 dodge 4 11 17
## 57 dodge 4 11 15
## 58 dodge 4 13 17
## 59 dodge 4 13 17
## 60 dodge 4 9 12
## 61 dodge 4 13 17
## 62 dodge 4 11 16
## 63 dodge 4 13 18
## 64 dodge 4 11 15
## 65 dodge 4 12 16
## 66 dodge 4 9 12
## 67 dodge 4 13 17
## 68 dodge 4 13 17
## 69 dodge 4 12 16
## 70 dodge 4 9 12
## 71 dodge 4 11 15
## 72 dodge 4 11 16
## 73 dodge 4 13 17
## 74 dodge 4 11 15
## 75 ford r 11 17
## 76 ford r 11 17
## 77 ford r 12 18
## 78 ford 4 14 17
## 79 ford 4 15 19
## 80 ford 4 14 17
## 81 ford 4 13 19
## 82 ford 4 13 19
## 83 ford 4 13 17
## 84 ford 4 14 17
## 85 ford 4 14 17
## 86 ford 4 13 16
## 87 ford 4 13 16
## 88 ford 4 13 17
## 89 ford 4 11 15
## 90 ford 4 13 17
## 91 ford r 18 26
## 92 ford r 18 25
## 93 ford r 17 26
## 94 ford r 16 24
## 95 ford r 15 21
## 96 ford r 15 22
## 97 ford r 15 23
## 98 ford r 15 22
## 99 ford r 14 20
## 100 honda f 28 33
## 101 honda f 24 32
## 102 honda f 25 32
## 103 honda f 23 29
## 104 honda f 24 32
## 105 honda f 26 34
## 106 honda f 25 36
## 107 honda f 24 36
## 108 honda f 21 29
## 109 hyundai f 18 26
## 110 hyundai f 18 27
## 111 hyundai f 21 30
## 112 hyundai f 21 31
## 113 hyundai f 18 26
## 114 hyundai f 18 26
## 115 hyundai f 19 28
## 116 hyundai f 19 26
## 117 hyundai f 19 29
## 118 hyundai f 20 28
## 119 hyundai f 20 27
## 120 hyundai f 17 24
## 121 hyundai f 16 24
## 122 hyundai f 17 24
## 123 jeep 4 17 22
## 124 jeep 4 15 19
## 125 jeep 4 15 20
## 126 jeep 4 14 17
## 127 jeep 4 9 12
## 128 jeep 4 14 19
## 129 jeep 4 13 18
## 130 jeep 4 11 14
## 131 land rover 4 11 15
## 132 land rover 4 12 18
## 133 land rover 4 12 18
## 134 land rover 4 11 15
## 135 lincoln r 11 17
## 136 lincoln r 11 16
## 137 lincoln r 12 18
## 138 mercury 4 14 17
## 139 mercury 4 13 19
## 140 mercury 4 13 19
## 141 mercury 4 13 17
## 142 nissan f 21 29
## 143 nissan f 19 27
## 144 nissan f 23 31
## 145 nissan f 23 32
## 146 nissan f 19 27
## 147 nissan f 19 26
## 148 nissan f 18 26
## 149 nissan f 19 25
## 150 nissan f 19 25
## 151 nissan 4 14 17
## 152 nissan 4 15 17
## 153 nissan 4 14 20
## 154 nissan 4 12 18
## 155 pontiac f 18 26
## 156 pontiac f 16 26
## 157 pontiac f 17 27
## 158 pontiac f 18 28
## 159 pontiac f 16 25
## 160 subaru 4 18 25
## 161 subaru 4 18 24
## 162 subaru 4 20 27
## 163 subaru 4 19 25
## 164 subaru 4 20 26
## 165 subaru 4 18 23
## 166 subaru 4 21 26
## 167 subaru 4 19 26
## 168 subaru 4 19 26
## 169 subaru 4 19 26
## 170 subaru 4 20 25
## 171 subaru 4 20 27
## 172 subaru 4 19 25
## 173 subaru 4 20 27
## 174 toyota 4 15 20
## 175 toyota 4 16 20
## 176 toyota 4 15 19
## 177 toyota 4 15 17
## 178 toyota 4 16 20
## 179 toyota 4 14 17
## 180 toyota f 21 29
## 181 toyota f 21 27
## 182 toyota f 21 31
## 183 toyota f 21 31
## 184 toyota f 18 26
## 185 toyota f 18 26
## 186 toyota f 19 28
## 187 toyota f 21 27
## 188 toyota f 21 29
## 189 toyota f 21 31
## 190 toyota f 22 31
## 191 toyota f 18 26
## 192 toyota f 18 26
## 193 toyota f 18 27
## 194 toyota f 24 30
## 195 toyota f 24 33
## 196 toyota f 26 35
## 197 toyota f 28 37
## 198 toyota f 26 35
## 199 toyota 4 11 15
## 200 toyota 4 13 18
## 201 toyota 4 15 20
## 202 toyota 4 16 20
## 203 toyota 4 17 22
## 204 toyota 4 15 17
## 205 toyota 4 15 19
## 206 toyota 4 15 18
## 207 toyota 4 16 20
## 208 volkswagen f 21 29
## 209 volkswagen f 19 26
## 210 volkswagen f 21 29
## 211 volkswagen f 22 29
## 212 volkswagen f 17 24
## 213 volkswagen f 33 44
## 214 volkswagen f 21 29
## 215 volkswagen f 19 26
## 216 volkswagen f 22 29
## 217 volkswagen f 21 29
## 218 volkswagen f 21 29
## 219 volkswagen f 21 29
## 220 volkswagen f 16 23
## 221 volkswagen f 17 24
## 222 volkswagen f 35 44
## 223 volkswagen f 29 41
## 224 volkswagen f 21 29
## 225 volkswagen f 19 26
## 226 volkswagen f 20 28
## 227 volkswagen f 20 29
## 228 volkswagen f 21 29
## 229 volkswagen f 18 29
## 230 volkswagen f 19 28
## 231 volkswagen f 21 29
## 232 volkswagen f 16 26
## 233 volkswagen f 18 26
## 234 volkswagen f 17 26
mpg1 %>% select(-1)
## trans drv cty hwy
## 1 auto f 18 29
## 2 manual f 21 29
## 3 manual f 20 31
## 4 auto f 21 30
## 5 auto f 16 26
## 6 manual f 18 26
## 7 auto f 18 27
## 8 manual 4 18 26
## 9 auto 4 16 25
## 10 manual 4 20 28
## 11 auto 4 19 27
## 12 auto 4 15 25
## 13 manual 4 17 25
## 14 auto 4 17 25
## 15 manual 4 15 25
## 16 auto 4 15 24
## 17 auto 4 17 25
## 18 auto 4 16 23
## 19 auto r 14 20
## 20 auto r 11 15
## 21 auto r 14 20
## 22 auto r 13 17
## 23 auto r 12 17
## 24 manual r 16 26
## 25 auto r 15 23
## 26 manual r 16 26
## 27 auto r 15 25
## 28 manual r 15 24
## 29 auto 4 14 19
## 30 auto 4 11 14
## 31 auto 4 11 15
## 32 auto 4 14 17
## 33 auto f 19 27
## 34 auto f 22 30
## 35 auto f 18 26
## 36 auto f 18 29
## 37 auto f 17 26
## 38 auto f 18 24
## 39 auto f 17 24
## 40 auto f 16 22
## 41 auto f 16 22
## 42 auto f 17 24
## 43 auto f 17 24
## 44 auto f 11 17
## 45 auto f 15 22
## 46 auto f 15 21
## 47 auto f 16 23
## 48 auto f 16 23
## 49 manual 4 15 19
## 50 auto 4 14 18
## 51 auto 4 13 17
## 52 manual 4 14 17
## 53 auto 4 14 19
## 54 auto 4 14 19
## 55 auto 4 9 12
## 56 manual 4 11 17
## 57 auto 4 11 15
## 58 auto 4 13 17
## 59 auto 4 13 17
## 60 auto 4 9 12
## 61 auto 4 13 17
## 62 auto 4 11 16
## 63 auto 4 13 18
## 64 auto 4 11 15
## 65 manual 4 12 16
## 66 auto 4 9 12
## 67 auto 4 13 17
## 68 auto 4 13 17
## 69 manual 4 12 16
## 70 manual 4 9 12
## 71 auto 4 11 15
## 72 manual 4 11 16
## 73 auto 4 13 17
## 74 auto 4 11 15
## 75 auto r 11 17
## 76 auto r 11 17
## 77 auto r 12 18
## 78 auto 4 14 17
## 79 manual 4 15 19
## 80 auto 4 14 17
## 81 auto 4 13 19
## 82 auto 4 13 19
## 83 auto 4 13 17
## 84 auto 4 14 17
## 85 manual 4 14 17
## 86 manual 4 13 16
## 87 auto 4 13 16
## 88 auto 4 13 17
## 89 auto 4 11 15
## 90 auto 4 13 17
## 91 manual r 18 26
## 92 auto r 18 25
## 93 manual r 17 26
## 94 auto r 16 24
## 95 auto r 15 21
## 96 manual r 15 22
## 97 manual r 15 23
## 98 auto r 15 22
## 99 manual r 14 20
## 100 manual f 28 33
## 101 auto f 24 32
## 102 manual f 25 32
## 103 manual f 23 29
## 104 auto f 24 32
## 105 manual f 26 34
## 106 auto f 25 36
## 107 auto f 24 36
## 108 manual f 21 29
## 109 auto f 18 26
## 110 manual f 18 27
## 111 auto f 21 30
## 112 manual f 21 31
## 113 auto f 18 26
## 114 manual f 18 26
## 115 auto f 19 28
## 116 auto f 19 26
## 117 manual f 19 29
## 118 manual f 20 28
## 119 auto f 20 27
## 120 auto f 17 24
## 121 manual f 16 24
## 122 manual f 17 24
## 123 auto 4 17 22
## 124 auto 4 15 19
## 125 auto 4 15 20
## 126 auto 4 14 17
## 127 auto 4 9 12
## 128 auto 4 14 19
## 129 auto 4 13 18
## 130 auto 4 11 14
## 131 auto 4 11 15
## 132 auto 4 12 18
## 133 auto 4 12 18
## 134 auto 4 11 15
## 135 auto r 11 17
## 136 auto r 11 16
## 137 auto r 12 18
## 138 auto 4 14 17
## 139 auto 4 13 19
## 140 auto 4 13 19
## 141 auto 4 13 17
## 142 manual f 21 29
## 143 auto f 19 27
## 144 auto f 23 31
## 145 manual f 23 32
## 146 manual f 19 27
## 147 auto f 19 26
## 148 auto f 18 26
## 149 manual f 19 25
## 150 auto f 19 25
## 151 auto 4 14 17
## 152 manual 4 15 17
## 153 auto 4 14 20
## 154 auto 4 12 18
## 155 auto f 18 26
## 156 auto f 16 26
## 157 auto f 17 27
## 158 auto f 18 28
## 159 auto f 16 25
## 160 manual 4 18 25
## 161 auto 4 18 24
## 162 manual 4 20 27
## 163 manual 4 19 25
## 164 auto 4 20 26
## 165 auto 4 18 23
## 166 auto 4 21 26
## 167 manual 4 19 26
## 168 manual 4 19 26
## 169 auto 4 19 26
## 170 auto 4 20 25
## 171 auto 4 20 27
## 172 manual 4 19 25
## 173 manual 4 20 27
## 174 manual 4 15 20
## 175 auto 4 16 20
## 176 auto 4 15 19
## 177 manual 4 15 17
## 178 auto 4 16 20
## 179 auto 4 14 17
## 180 manual f 21 29
## 181 auto f 21 27
## 182 manual f 21 31
## 183 auto f 21 31
## 184 auto f 18 26
## 185 manual f 18 26
## 186 auto f 19 28
## 187 auto f 21 27
## 188 manual f 21 29
## 189 manual f 21 31
## 190 auto f 22 31
## 191 auto f 18 26
## 192 manual f 18 26
## 193 auto f 18 27
## 194 auto f 24 30
## 195 auto f 24 33
## 196 manual f 26 35
## 197 manual f 28 37
## 198 auto f 26 35
## 199 auto 4 11 15
## 200 auto 4 13 18
## 201 manual 4 15 20
## 202 auto 4 16 20
## 203 manual 4 17 22
## 204 manual 4 15 17
## 205 auto 4 15 19
## 206 manual 4 15 18
## 207 auto 4 16 20
## 208 manual f 21 29
## 209 auto f 19 26
## 210 manual f 21 29
## 211 auto f 22 29
## 212 manual f 17 24
## 213 manual f 33 44
## 214 manual f 21 29
## 215 auto f 19 26
## 216 auto f 22 29
## 217 manual f 21 29
## 218 auto f 21 29
## 219 manual f 21 29
## 220 auto f 16 23
## 221 manual f 17 24
## 222 manual f 35 44
## 223 auto f 29 41
## 224 manual f 21 29
## 225 auto f 19 26
## 226 manual f 20 28
## 227 auto f 20 29
## 228 manual f 21 29
## 229 auto f 18 29
## 230 auto f 19 28
## 231 manual f 21 29
## 232 auto f 16 26
## 233 manual f 18 26
## 234 auto f 17 26
mpg1 %>% slice(1,4,5)
## manufacturer trans drv cty hwy
## 1 audi auto f 18 29
## 2 audi auto f 21 30
## 3 audi auto f 16 26
mpg1 %>% filter(manufacturer=="hyundai")
## manufacturer trans drv cty hwy
## 1 hyundai auto f 18 26
## 2 hyundai manual f 18 27
## 3 hyundai auto f 21 30
## 4 hyundai manual f 21 31
## 5 hyundai auto f 18 26
## 6 hyundai manual f 18 26
## 7 hyundai auto f 19 28
## 8 hyundai auto f 19 26
## 9 hyundai manual f 19 29
## 10 hyundai manual f 20 28
## 11 hyundai auto f 20 27
## 12 hyundai auto f 17 24
## 13 hyundai manual f 16 24
## 14 hyundai manual f 17 24
mpg1 %>% filter(cty==35)
## manufacturer trans drv cty hwy
## 1 volkswagen manual f 35 44
mpg1 %>% filter(cty==max(cty))
## manufacturer trans drv cty hwy
## 1 volkswagen manual f 35 44
mpg1 %>% filter(manufacturer!="hyundai")
## manufacturer trans drv cty hwy
## 1 audi auto f 18 29
## 2 audi manual f 21 29
## 3 audi manual f 20 31
## 4 audi auto f 21 30
## 5 audi auto f 16 26
## 6 audi manual f 18 26
## 7 audi auto f 18 27
## 8 audi manual 4 18 26
## 9 audi auto 4 16 25
## 10 audi manual 4 20 28
## 11 audi auto 4 19 27
## 12 audi auto 4 15 25
## 13 audi manual 4 17 25
## 14 audi auto 4 17 25
## 15 audi manual 4 15 25
## 16 audi auto 4 15 24
## 17 audi auto 4 17 25
## 18 audi auto 4 16 23
## 19 chevrolet auto r 14 20
## 20 chevrolet auto r 11 15
## 21 chevrolet auto r 14 20
## 22 chevrolet auto r 13 17
## 23 chevrolet auto r 12 17
## 24 chevrolet manual r 16 26
## 25 chevrolet auto r 15 23
## 26 chevrolet manual r 16 26
## 27 chevrolet auto r 15 25
## 28 chevrolet manual r 15 24
## 29 chevrolet auto 4 14 19
## 30 chevrolet auto 4 11 14
## 31 chevrolet auto 4 11 15
## 32 chevrolet auto 4 14 17
## 33 chevrolet auto f 19 27
## 34 chevrolet auto f 22 30
## 35 chevrolet auto f 18 26
## 36 chevrolet auto f 18 29
## 37 chevrolet auto f 17 26
## 38 dodge auto f 18 24
## 39 dodge auto f 17 24
## 40 dodge auto f 16 22
## 41 dodge auto f 16 22
## 42 dodge auto f 17 24
## 43 dodge auto f 17 24
## 44 dodge auto f 11 17
## 45 dodge auto f 15 22
## 46 dodge auto f 15 21
## 47 dodge auto f 16 23
## 48 dodge auto f 16 23
## 49 dodge manual 4 15 19
## 50 dodge auto 4 14 18
## 51 dodge auto 4 13 17
## 52 dodge manual 4 14 17
## 53 dodge auto 4 14 19
## 54 dodge auto 4 14 19
## 55 dodge auto 4 9 12
## 56 dodge manual 4 11 17
## 57 dodge auto 4 11 15
## 58 dodge auto 4 13 17
## 59 dodge auto 4 13 17
## 60 dodge auto 4 9 12
## 61 dodge auto 4 13 17
## 62 dodge auto 4 11 16
## 63 dodge auto 4 13 18
## 64 dodge auto 4 11 15
## 65 dodge manual 4 12 16
## 66 dodge auto 4 9 12
## 67 dodge auto 4 13 17
## 68 dodge auto 4 13 17
## 69 dodge manual 4 12 16
## 70 dodge manual 4 9 12
## 71 dodge auto 4 11 15
## 72 dodge manual 4 11 16
## 73 dodge auto 4 13 17
## 74 dodge auto 4 11 15
## 75 ford auto r 11 17
## 76 ford auto r 11 17
## 77 ford auto r 12 18
## 78 ford auto 4 14 17
## 79 ford manual 4 15 19
## 80 ford auto 4 14 17
## 81 ford auto 4 13 19
## 82 ford auto 4 13 19
## 83 ford auto 4 13 17
## 84 ford auto 4 14 17
## 85 ford manual 4 14 17
## 86 ford manual 4 13 16
## 87 ford auto 4 13 16
## 88 ford auto 4 13 17
## 89 ford auto 4 11 15
## 90 ford auto 4 13 17
## 91 ford manual r 18 26
## 92 ford auto r 18 25
## 93 ford manual r 17 26
## 94 ford auto r 16 24
## 95 ford auto r 15 21
## 96 ford manual r 15 22
## 97 ford manual r 15 23
## 98 ford auto r 15 22
## 99 ford manual r 14 20
## 100 honda manual f 28 33
## 101 honda auto f 24 32
## 102 honda manual f 25 32
## 103 honda manual f 23 29
## 104 honda auto f 24 32
## 105 honda manual f 26 34
## 106 honda auto f 25 36
## 107 honda auto f 24 36
## 108 honda manual f 21 29
## 109 jeep auto 4 17 22
## 110 jeep auto 4 15 19
## 111 jeep auto 4 15 20
## 112 jeep auto 4 14 17
## 113 jeep auto 4 9 12
## 114 jeep auto 4 14 19
## 115 jeep auto 4 13 18
## 116 jeep auto 4 11 14
## 117 land rover auto 4 11 15
## 118 land rover auto 4 12 18
## 119 land rover auto 4 12 18
## 120 land rover auto 4 11 15
## 121 lincoln auto r 11 17
## 122 lincoln auto r 11 16
## 123 lincoln auto r 12 18
## 124 mercury auto 4 14 17
## 125 mercury auto 4 13 19
## 126 mercury auto 4 13 19
## 127 mercury auto 4 13 17
## 128 nissan manual f 21 29
## 129 nissan auto f 19 27
## 130 nissan auto f 23 31
## 131 nissan manual f 23 32
## 132 nissan manual f 19 27
## 133 nissan auto f 19 26
## 134 nissan auto f 18 26
## 135 nissan manual f 19 25
## 136 nissan auto f 19 25
## 137 nissan auto 4 14 17
## 138 nissan manual 4 15 17
## 139 nissan auto 4 14 20
## 140 nissan auto 4 12 18
## 141 pontiac auto f 18 26
## 142 pontiac auto f 16 26
## 143 pontiac auto f 17 27
## 144 pontiac auto f 18 28
## 145 pontiac auto f 16 25
## 146 subaru manual 4 18 25
## 147 subaru auto 4 18 24
## 148 subaru manual 4 20 27
## 149 subaru manual 4 19 25
## 150 subaru auto 4 20 26
## 151 subaru auto 4 18 23
## 152 subaru auto 4 21 26
## 153 subaru manual 4 19 26
## 154 subaru manual 4 19 26
## 155 subaru auto 4 19 26
## 156 subaru auto 4 20 25
## 157 subaru auto 4 20 27
## 158 subaru manual 4 19 25
## 159 subaru manual 4 20 27
## 160 toyota manual 4 15 20
## 161 toyota auto 4 16 20
## 162 toyota auto 4 15 19
## 163 toyota manual 4 15 17
## 164 toyota auto 4 16 20
## 165 toyota auto 4 14 17
## 166 toyota manual f 21 29
## 167 toyota auto f 21 27
## 168 toyota manual f 21 31
## 169 toyota auto f 21 31
## 170 toyota auto f 18 26
## 171 toyota manual f 18 26
## 172 toyota auto f 19 28
## 173 toyota auto f 21 27
## 174 toyota manual f 21 29
## 175 toyota manual f 21 31
## 176 toyota auto f 22 31
## 177 toyota auto f 18 26
## 178 toyota manual f 18 26
## 179 toyota auto f 18 27
## 180 toyota auto f 24 30
## 181 toyota auto f 24 33
## 182 toyota manual f 26 35
## 183 toyota manual f 28 37
## 184 toyota auto f 26 35
## 185 toyota auto 4 11 15
## 186 toyota auto 4 13 18
## 187 toyota manual 4 15 20
## 188 toyota auto 4 16 20
## 189 toyota manual 4 17 22
## 190 toyota manual 4 15 17
## 191 toyota auto 4 15 19
## 192 toyota manual 4 15 18
## 193 toyota auto 4 16 20
## 194 volkswagen manual f 21 29
## 195 volkswagen auto f 19 26
## 196 volkswagen manual f 21 29
## 197 volkswagen auto f 22 29
## 198 volkswagen manual f 17 24
## 199 volkswagen manual f 33 44
## 200 volkswagen manual f 21 29
## 201 volkswagen auto f 19 26
## 202 volkswagen auto f 22 29
## 203 volkswagen manual f 21 29
## 204 volkswagen auto f 21 29
## 205 volkswagen manual f 21 29
## 206 volkswagen auto f 16 23
## 207 volkswagen manual f 17 24
## 208 volkswagen manual f 35 44
## 209 volkswagen auto f 29 41
## 210 volkswagen manual f 21 29
## 211 volkswagen auto f 19 26
## 212 volkswagen manual f 20 28
## 213 volkswagen auto f 20 29
## 214 volkswagen manual f 21 29
## 215 volkswagen auto f 18 29
## 216 volkswagen auto f 19 28
## 217 volkswagen manual f 21 29
## 218 volkswagen auto f 16 26
## 219 volkswagen manual f 18 26
## 220 volkswagen auto f 17 26
mpg1 %>% filter(cty<mean(cty))
## manufacturer trans drv cty hwy
## 1 audi auto f 16 26
## 2 audi auto 4 16 25
## 3 audi auto 4 15 25
## 4 audi manual 4 15 25
## 5 audi auto 4 15 24
## 6 audi auto 4 16 23
## 7 chevrolet auto r 14 20
## 8 chevrolet auto r 11 15
## 9 chevrolet auto r 14 20
## 10 chevrolet auto r 13 17
## 11 chevrolet auto r 12 17
## 12 chevrolet manual r 16 26
## 13 chevrolet auto r 15 23
## 14 chevrolet manual r 16 26
## 15 chevrolet auto r 15 25
## 16 chevrolet manual r 15 24
## 17 chevrolet auto 4 14 19
## 18 chevrolet auto 4 11 14
## 19 chevrolet auto 4 11 15
## 20 chevrolet auto 4 14 17
## 21 dodge auto f 16 22
## 22 dodge auto f 16 22
## 23 dodge auto f 11 17
## 24 dodge auto f 15 22
## 25 dodge auto f 15 21
## 26 dodge auto f 16 23
## 27 dodge auto f 16 23
## 28 dodge manual 4 15 19
## 29 dodge auto 4 14 18
## 30 dodge auto 4 13 17
## 31 dodge manual 4 14 17
## 32 dodge auto 4 14 19
## 33 dodge auto 4 14 19
## 34 dodge auto 4 9 12
## 35 dodge manual 4 11 17
## 36 dodge auto 4 11 15
## 37 dodge auto 4 13 17
## 38 dodge auto 4 13 17
## 39 dodge auto 4 9 12
## 40 dodge auto 4 13 17
## 41 dodge auto 4 11 16
## 42 dodge auto 4 13 18
## 43 dodge auto 4 11 15
## 44 dodge manual 4 12 16
## 45 dodge auto 4 9 12
## 46 dodge auto 4 13 17
## 47 dodge auto 4 13 17
## 48 dodge manual 4 12 16
## 49 dodge manual 4 9 12
## 50 dodge auto 4 11 15
## 51 dodge manual 4 11 16
## 52 dodge auto 4 13 17
## 53 dodge auto 4 11 15
## 54 ford auto r 11 17
## 55 ford auto r 11 17
## 56 ford auto r 12 18
## 57 ford auto 4 14 17
## 58 ford manual 4 15 19
## 59 ford auto 4 14 17
## 60 ford auto 4 13 19
## 61 ford auto 4 13 19
## 62 ford auto 4 13 17
## 63 ford auto 4 14 17
## 64 ford manual 4 14 17
## 65 ford manual 4 13 16
## 66 ford auto 4 13 16
## 67 ford auto 4 13 17
## 68 ford auto 4 11 15
## 69 ford auto 4 13 17
## 70 ford auto r 16 24
## 71 ford auto r 15 21
## 72 ford manual r 15 22
## 73 ford manual r 15 23
## 74 ford auto r 15 22
## 75 ford manual r 14 20
## 76 hyundai manual f 16 24
## 77 jeep auto 4 15 19
## 78 jeep auto 4 15 20
## 79 jeep auto 4 14 17
## 80 jeep auto 4 9 12
## 81 jeep auto 4 14 19
## 82 jeep auto 4 13 18
## 83 jeep auto 4 11 14
## 84 land rover auto 4 11 15
## 85 land rover auto 4 12 18
## 86 land rover auto 4 12 18
## 87 land rover auto 4 11 15
## 88 lincoln auto r 11 17
## 89 lincoln auto r 11 16
## 90 lincoln auto r 12 18
## 91 mercury auto 4 14 17
## 92 mercury auto 4 13 19
## 93 mercury auto 4 13 19
## 94 mercury auto 4 13 17
## 95 nissan auto 4 14 17
## 96 nissan manual 4 15 17
## 97 nissan auto 4 14 20
## 98 nissan auto 4 12 18
## 99 pontiac auto f 16 26
## 100 pontiac auto f 16 25
## 101 toyota manual 4 15 20
## 102 toyota auto 4 16 20
## 103 toyota auto 4 15 19
## 104 toyota manual 4 15 17
## 105 toyota auto 4 16 20
## 106 toyota auto 4 14 17
## 107 toyota auto 4 11 15
## 108 toyota auto 4 13 18
## 109 toyota manual 4 15 20
## 110 toyota auto 4 16 20
## 111 toyota manual 4 15 17
## 112 toyota auto 4 15 19
## 113 toyota manual 4 15 18
## 114 toyota auto 4 16 20
## 115 volkswagen auto f 16 23
## 116 volkswagen auto f 16 26
mpg1 %>% filter(manufacturer=="hyundai"&cty>=mean(cty))
## manufacturer trans drv cty hwy
## 1 hyundai auto f 18 26
## 2 hyundai manual f 18 27
## 3 hyundai auto f 21 30
## 4 hyundai manual f 21 31
## 5 hyundai auto f 18 26
## 6 hyundai manual f 18 26
## 7 hyundai auto f 19 28
## 8 hyundai auto f 19 26
## 9 hyundai manual f 19 29
## 10 hyundai manual f 20 28
## 11 hyundai auto f 20 27
## 12 hyundai auto f 17 24
## 13 hyundai manual f 17 24
mpg1 %>% filter(manufacturer == "hyundai"&trans=="auto"&cty>=median(mpg1$cty))
## manufacturer trans drv cty hwy
## 1 hyundai auto f 18 26
## 2 hyundai auto f 21 30
## 3 hyundai auto f 18 26
## 4 hyundai auto f 19 28
## 5 hyundai auto f 19 26
## 6 hyundai auto f 20 27
## 7 hyundai auto f 17 24
mpg1 %>% filter(manufacturer=="honda"|manufacturer=="nissan"|
manufacturer=="subaru"|manufacturer=="toyota")
## manufacturer trans drv cty hwy
## 1 honda manual f 28 33
## 2 honda auto f 24 32
## 3 honda manual f 25 32
## 4 honda manual f 23 29
## 5 honda auto f 24 32
## 6 honda manual f 26 34
## 7 honda auto f 25 36
## 8 honda auto f 24 36
## 9 honda manual f 21 29
## 10 nissan manual f 21 29
## 11 nissan auto f 19 27
## 12 nissan auto f 23 31
## 13 nissan manual f 23 32
## 14 nissan manual f 19 27
## 15 nissan auto f 19 26
## 16 nissan auto f 18 26
## 17 nissan manual f 19 25
## 18 nissan auto f 19 25
## 19 nissan auto 4 14 17
## 20 nissan manual 4 15 17
## 21 nissan auto 4 14 20
## 22 nissan auto 4 12 18
## 23 subaru manual 4 18 25
## 24 subaru auto 4 18 24
## 25 subaru manual 4 20 27
## 26 subaru manual 4 19 25
## 27 subaru auto 4 20 26
## 28 subaru auto 4 18 23
## 29 subaru auto 4 21 26
## 30 subaru manual 4 19 26
## 31 subaru manual 4 19 26
## 32 subaru auto 4 19 26
## 33 subaru auto 4 20 25
## 34 subaru auto 4 20 27
## 35 subaru manual 4 19 25
## 36 subaru manual 4 20 27
## 37 toyota manual 4 15 20
## 38 toyota auto 4 16 20
## 39 toyota auto 4 15 19
## 40 toyota manual 4 15 17
## 41 toyota auto 4 16 20
## 42 toyota auto 4 14 17
## 43 toyota manual f 21 29
## 44 toyota auto f 21 27
## 45 toyota manual f 21 31
## 46 toyota auto f 21 31
## 47 toyota auto f 18 26
## 48 toyota manual f 18 26
## 49 toyota auto f 19 28
## 50 toyota auto f 21 27
## 51 toyota manual f 21 29
## 52 toyota manual f 21 31
## 53 toyota auto f 22 31
## 54 toyota auto f 18 26
## 55 toyota manual f 18 26
## 56 toyota auto f 18 27
## 57 toyota auto f 24 30
## 58 toyota auto f 24 33
## 59 toyota manual f 26 35
## 60 toyota manual f 28 37
## 61 toyota auto f 26 35
## 62 toyota auto 4 11 15
## 63 toyota auto 4 13 18
## 64 toyota manual 4 15 20
## 65 toyota auto 4 16 20
## 66 toyota manual 4 17 22
## 67 toyota manual 4 15 17
## 68 toyota auto 4 15 19
## 69 toyota manual 4 15 18
## 70 toyota auto 4 16 20
mpg1 %>% select(manufacturer,cty) %>% filter(manufacturer=="hyundai"&cty>=16.85897)
## manufacturer cty
## 1 hyundai 18
## 2 hyundai 18
## 3 hyundai 21
## 4 hyundai 21
## 5 hyundai 18
## 6 hyundai 18
## 7 hyundai 19
## 8 hyundai 19
## 9 hyundai 19
## 10 hyundai 20
## 11 hyundai 20
## 12 hyundai 17
## 13 hyundai 17
mpg1 %>% mutate(total=cty+hwy) %>% head
## manufacturer trans drv cty hwy total
## 1 audi auto f 18 29 47
## 2 audi manual f 21 29 50
## 3 audi manual f 20 31 51
## 4 audi auto f 21 30 51
## 5 audi auto f 16 26 42
## 6 audi manual f 18 26 44
mpg1 %>% mutate(total=cty+hwy) %>% str
## 'data.frame': 234 obs. of 6 variables:
## $ manufacturer: chr "audi" "audi" "audi" "audi" ...
## $ trans : chr "auto" "manual" "manual" "auto" ...
## $ drv : chr "f" "f" "f" "f" ...
## $ cty : int 18 21 20 21 16 18 18 18 16 20 ...
## $ hwy : int 29 29 31 30 26 26 27 26 25 28 ...
## $ total : int 47 50 51 51 42 44 45 44 41 48 ...
mpg1 %>% mutate(total=cty+hwy,mean=(total/2)) %>% head
## manufacturer trans drv cty hwy total mean
## 1 audi auto f 18 29 47 23.5
## 2 audi manual f 21 29 50 25.0
## 3 audi manual f 20 31 51 25.5
## 4 audi auto f 21 30 51 25.5
## 5 audi auto f 16 26 42 21.0
## 6 audi manual f 18 26 44 22.0
mpg1 %>% summarise(m=mean(cty))
## m
## 1 16.85897
mpg1 %>% group_by(trans) %>% summarise(m=mean(cty))
## # A tibble: 2 x 2
## trans m
## <chr> <dbl>
## 1 auto 16.0
## 2 manual 18.7
mpg1 %>% group_by(trans) %>% summarise(n=n())
## # A tibble: 2 x 2
## trans n
## <chr> <int>
## 1 auto 157
## 2 manual 77
mpg1 %>% group_by(trans) %>% summarise(n=n()) %>%
mutate(total=sum(n),pct=n/total*100)
## # A tibble: 2 x 4
## trans n total pct
## <chr> <int> <int> <dbl>
## 1 auto 157 234 67.1
## 2 manual 77 234 32.9
mpg1 %>%
filter(trans=="auto"&drv=="4") %>%
summarise(m=mean(cty))
## m
## 1 13.85333
a<-c(1,3,4,6,9)
ifelse(a%%2==2,"aaa","bbb")
## [1] "bbb" "bbb" "bbb" "bbb" "bbb"
mpg1 %>% mutate(cty_class=ifelse(cty >=16.85897,"good","bad"))
## manufacturer trans drv cty hwy cty_class
## 1 audi auto f 18 29 good
## 2 audi manual f 21 29 good
## 3 audi manual f 20 31 good
## 4 audi auto f 21 30 good
## 5 audi auto f 16 26 bad
## 6 audi manual f 18 26 good
## 7 audi auto f 18 27 good
## 8 audi manual 4 18 26 good
## 9 audi auto 4 16 25 bad
## 10 audi manual 4 20 28 good
## 11 audi auto 4 19 27 good
## 12 audi auto 4 15 25 bad
## 13 audi manual 4 17 25 good
## 14 audi auto 4 17 25 good
## 15 audi manual 4 15 25 bad
## 16 audi auto 4 15 24 bad
## 17 audi auto 4 17 25 good
## 18 audi auto 4 16 23 bad
## 19 chevrolet auto r 14 20 bad
## 20 chevrolet auto r 11 15 bad
## 21 chevrolet auto r 14 20 bad
## 22 chevrolet auto r 13 17 bad
## 23 chevrolet auto r 12 17 bad
## 24 chevrolet manual r 16 26 bad
## 25 chevrolet auto r 15 23 bad
## 26 chevrolet manual r 16 26 bad
## 27 chevrolet auto r 15 25 bad
## 28 chevrolet manual r 15 24 bad
## 29 chevrolet auto 4 14 19 bad
## 30 chevrolet auto 4 11 14 bad
## 31 chevrolet auto 4 11 15 bad
## 32 chevrolet auto 4 14 17 bad
## 33 chevrolet auto f 19 27 good
## 34 chevrolet auto f 22 30 good
## 35 chevrolet auto f 18 26 good
## 36 chevrolet auto f 18 29 good
## 37 chevrolet auto f 17 26 good
## 38 dodge auto f 18 24 good
## 39 dodge auto f 17 24 good
## 40 dodge auto f 16 22 bad
## 41 dodge auto f 16 22 bad
## 42 dodge auto f 17 24 good
## 43 dodge auto f 17 24 good
## 44 dodge auto f 11 17 bad
## 45 dodge auto f 15 22 bad
## 46 dodge auto f 15 21 bad
## 47 dodge auto f 16 23 bad
## 48 dodge auto f 16 23 bad
## 49 dodge manual 4 15 19 bad
## 50 dodge auto 4 14 18 bad
## 51 dodge auto 4 13 17 bad
## 52 dodge manual 4 14 17 bad
## 53 dodge auto 4 14 19 bad
## 54 dodge auto 4 14 19 bad
## 55 dodge auto 4 9 12 bad
## 56 dodge manual 4 11 17 bad
## 57 dodge auto 4 11 15 bad
## 58 dodge auto 4 13 17 bad
## 59 dodge auto 4 13 17 bad
## 60 dodge auto 4 9 12 bad
## 61 dodge auto 4 13 17 bad
## 62 dodge auto 4 11 16 bad
## 63 dodge auto 4 13 18 bad
## 64 dodge auto 4 11 15 bad
## 65 dodge manual 4 12 16 bad
## 66 dodge auto 4 9 12 bad
## 67 dodge auto 4 13 17 bad
## 68 dodge auto 4 13 17 bad
## 69 dodge manual 4 12 16 bad
## 70 dodge manual 4 9 12 bad
## 71 dodge auto 4 11 15 bad
## 72 dodge manual 4 11 16 bad
## 73 dodge auto 4 13 17 bad
## 74 dodge auto 4 11 15 bad
## 75 ford auto r 11 17 bad
## 76 ford auto r 11 17 bad
## 77 ford auto r 12 18 bad
## 78 ford auto 4 14 17 bad
## 79 ford manual 4 15 19 bad
## 80 ford auto 4 14 17 bad
## 81 ford auto 4 13 19 bad
## 82 ford auto 4 13 19 bad
## 83 ford auto 4 13 17 bad
## 84 ford auto 4 14 17 bad
## 85 ford manual 4 14 17 bad
## 86 ford manual 4 13 16 bad
## 87 ford auto 4 13 16 bad
## 88 ford auto 4 13 17 bad
## 89 ford auto 4 11 15 bad
## 90 ford auto 4 13 17 bad
## 91 ford manual r 18 26 good
## 92 ford auto r 18 25 good
## 93 ford manual r 17 26 good
## 94 ford auto r 16 24 bad
## 95 ford auto r 15 21 bad
## 96 ford manual r 15 22 bad
## 97 ford manual r 15 23 bad
## 98 ford auto r 15 22 bad
## 99 ford manual r 14 20 bad
## 100 honda manual f 28 33 good
## 101 honda auto f 24 32 good
## 102 honda manual f 25 32 good
## 103 honda manual f 23 29 good
## 104 honda auto f 24 32 good
## 105 honda manual f 26 34 good
## 106 honda auto f 25 36 good
## 107 honda auto f 24 36 good
## 108 honda manual f 21 29 good
## 109 hyundai auto f 18 26 good
## 110 hyundai manual f 18 27 good
## 111 hyundai auto f 21 30 good
## 112 hyundai manual f 21 31 good
## 113 hyundai auto f 18 26 good
## 114 hyundai manual f 18 26 good
## 115 hyundai auto f 19 28 good
## 116 hyundai auto f 19 26 good
## 117 hyundai manual f 19 29 good
## 118 hyundai manual f 20 28 good
## 119 hyundai auto f 20 27 good
## 120 hyundai auto f 17 24 good
## 121 hyundai manual f 16 24 bad
## 122 hyundai manual f 17 24 good
## 123 jeep auto 4 17 22 good
## 124 jeep auto 4 15 19 bad
## 125 jeep auto 4 15 20 bad
## 126 jeep auto 4 14 17 bad
## 127 jeep auto 4 9 12 bad
## 128 jeep auto 4 14 19 bad
## 129 jeep auto 4 13 18 bad
## 130 jeep auto 4 11 14 bad
## 131 land rover auto 4 11 15 bad
## 132 land rover auto 4 12 18 bad
## 133 land rover auto 4 12 18 bad
## 134 land rover auto 4 11 15 bad
## 135 lincoln auto r 11 17 bad
## 136 lincoln auto r 11 16 bad
## 137 lincoln auto r 12 18 bad
## 138 mercury auto 4 14 17 bad
## 139 mercury auto 4 13 19 bad
## 140 mercury auto 4 13 19 bad
## 141 mercury auto 4 13 17 bad
## 142 nissan manual f 21 29 good
## 143 nissan auto f 19 27 good
## 144 nissan auto f 23 31 good
## 145 nissan manual f 23 32 good
## 146 nissan manual f 19 27 good
## 147 nissan auto f 19 26 good
## 148 nissan auto f 18 26 good
## 149 nissan manual f 19 25 good
## 150 nissan auto f 19 25 good
## 151 nissan auto 4 14 17 bad
## 152 nissan manual 4 15 17 bad
## 153 nissan auto 4 14 20 bad
## 154 nissan auto 4 12 18 bad
## 155 pontiac auto f 18 26 good
## 156 pontiac auto f 16 26 bad
## 157 pontiac auto f 17 27 good
## 158 pontiac auto f 18 28 good
## 159 pontiac auto f 16 25 bad
## 160 subaru manual 4 18 25 good
## 161 subaru auto 4 18 24 good
## 162 subaru manual 4 20 27 good
## 163 subaru manual 4 19 25 good
## 164 subaru auto 4 20 26 good
## 165 subaru auto 4 18 23 good
## 166 subaru auto 4 21 26 good
## 167 subaru manual 4 19 26 good
## 168 subaru manual 4 19 26 good
## 169 subaru auto 4 19 26 good
## 170 subaru auto 4 20 25 good
## 171 subaru auto 4 20 27 good
## 172 subaru manual 4 19 25 good
## 173 subaru manual 4 20 27 good
## 174 toyota manual 4 15 20 bad
## 175 toyota auto 4 16 20 bad
## 176 toyota auto 4 15 19 bad
## 177 toyota manual 4 15 17 bad
## 178 toyota auto 4 16 20 bad
## 179 toyota auto 4 14 17 bad
## 180 toyota manual f 21 29 good
## 181 toyota auto f 21 27 good
## 182 toyota manual f 21 31 good
## 183 toyota auto f 21 31 good
## 184 toyota auto f 18 26 good
## 185 toyota manual f 18 26 good
## 186 toyota auto f 19 28 good
## 187 toyota auto f 21 27 good
## 188 toyota manual f 21 29 good
## 189 toyota manual f 21 31 good
## 190 toyota auto f 22 31 good
## 191 toyota auto f 18 26 good
## 192 toyota manual f 18 26 good
## 193 toyota auto f 18 27 good
## 194 toyota auto f 24 30 good
## 195 toyota auto f 24 33 good
## 196 toyota manual f 26 35 good
## 197 toyota manual f 28 37 good
## 198 toyota auto f 26 35 good
## 199 toyota auto 4 11 15 bad
## 200 toyota auto 4 13 18 bad
## 201 toyota manual 4 15 20 bad
## 202 toyota auto 4 16 20 bad
## 203 toyota manual 4 17 22 good
## 204 toyota manual 4 15 17 bad
## 205 toyota auto 4 15 19 bad
## 206 toyota manual 4 15 18 bad
## 207 toyota auto 4 16 20 bad
## 208 volkswagen manual f 21 29 good
## 209 volkswagen auto f 19 26 good
## 210 volkswagen manual f 21 29 good
## 211 volkswagen auto f 22 29 good
## 212 volkswagen manual f 17 24 good
## 213 volkswagen manual f 33 44 good
## 214 volkswagen manual f 21 29 good
## 215 volkswagen auto f 19 26 good
## 216 volkswagen auto f 22 29 good
## 217 volkswagen manual f 21 29 good
## 218 volkswagen auto f 21 29 good
## 219 volkswagen manual f 21 29 good
## 220 volkswagen auto f 16 23 bad
## 221 volkswagen manual f 17 24 good
## 222 volkswagen manual f 35 44 good
## 223 volkswagen auto f 29 41 good
## 224 volkswagen manual f 21 29 good
## 225 volkswagen auto f 19 26 good
## 226 volkswagen manual f 20 28 good
## 227 volkswagen auto f 20 29 good
## 228 volkswagen manual f 21 29 good
## 229 volkswagen auto f 18 29 good
## 230 volkswagen auto f 19 28 good
## 231 volkswagen manual f 21 29 good
## 232 volkswagen auto f 16 26 bad
## 233 volkswagen manual f 18 26 good
## 234 volkswagen auto f 17 26 good
quantile(mpg1$hwy)
## 0% 25% 50% 75% 100%
## 12 18 24 27 44
mpg1 %>% mutate(hwy_class=ifelse(hwy>=27,"best",
ifelse(hwy>=24,"good",
ifelse(hwy>=18,"normal","bad")))) %>%
group_by(hwy_class) %>% summarise(m=mean(cty)) %>%
arrange(desc(m))
## # A tibble: 4 x 2
## hwy_class m
## <chr> <dbl>
## 1 best 21.7
## 2 good 17.6
## 3 normal 14.6
## 4 bad 12.1
mpg1 %>% arrange(cty) %>% head(3)
## manufacturer trans drv cty hwy
## 1 dodge auto 4 9 12
## 2 dodge auto 4 9 12
## 3 dodge auto 4 9 12
mpg1 %>% arrange(desc(cty)) %>% head(3)
## manufacturer trans drv cty hwy
## 1 volkswagen manual f 35 44
## 2 volkswagen manual f 33 44
## 3 volkswagen auto f 29 41