## Create dummy variables ######################################################################
sunbasket <- read.csv(file = "C:/Users/ehk994/Desktop/Teaching/Fall 2021/IMC465_Marketing Model II/Week 1 - Conjoint analysis/Mini project #1/SunBasket.csv", header=T)
sunbasket_sub <- sunbasket[,c(1:6)]
sunbasket_sub$calorie_count <- as.factor(sunbasket_sub$calorie_count)
sunbasket_sub$cuisine <- as.factor(sunbasket_sub$cuisine)
sunbasket_sub$free_ship <- as.factor(sunbasket_sub$free_ship)
sunbasket_sub$local_organic <- as.factor(sunbasket_sub$local_organic)
sunbasket_sub$prep_time <- as.factor(sunbasket_sub$prep_time)
sunbasket_sub$price <- as.factor(sunbasket_sub$price)
library(dummies)## dummies-1.5.6 provided by Decision Patternssunbasket_dummy <- dummy.data.frame(sunbasket_sub, sep = ".") ## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignored
## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignored
## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignored
## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignored
## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignored
## Warning in model.matrix.default(~x - 1, model.frame(~x - 1), contrasts = FALSE):
## non-list contrasts argument ignoredhead(sunbasket_dummy)## calorie_count.1 calorie_count.2 calorie_count.3 cuisine.1 cuisine.2 cuisine.3
## 1 0 1 0 0 0 0
## 2 0 1 0 0 1 0
## 3 0 1 0 0 0 0
## 4 0 1 0 0 0 0
## 5 0 1 0 0 0 0
## 6 0 1 0 0 0 0
## cuisine.4 free_ship.1 free_ship.2 local_organic.1 local_organic.2 prep_time.1
## 1 1 1 0 1 0 0
## 2 0 0 1 0 1 0
## 3 1 1 0 1 0 0
## 4 1 0 1 0 1 1
## 5 1 0 1 0 1 0
## 6 1 1 0 1 0 0
## prep_time.2 prep_time.3 price.1 price.2 price.3
## 1 1 0 0 1 0
## 2 1 0 1 0 0
## 3 1 0 0 0 1
## 4 0 0 1 0 0
## 5 0 1 0 0 1
## 6 0 1 1 0 0print(sunbasket_dummy)## calorie_count.1 calorie_count.2 calorie_count.3 cuisine.1 cuisine.2
## 1 0 1 0 0 0
## 2 0 1 0 0 1
## 3 0 1 0 0 0
## 4 0 1 0 0 0
## 5 0 1 0 0 0
## 6 0 1 0 0 0
## 7 0 1 0 0 1
## 8 0 1 0 0 0
## 9 0 1 0 0 1
## 10 0 1 0 1 0
## 11 0 1 0 0 0
## 12 0 1 0 1 0
## 13 0 1 0 0 0
## 14 0 1 0 0 1
## 15 0 1 0 0 1
## 16 0 1 0 0 1
## 17 0 1 0 0 0
## 18 0 1 0 0 0
## 19 0 1 0 0 1
## 20 0 1 0 0 1
## 21 0 1 0 1 0
## 22 0 1 0 0 0
## 23 0 1 0 0 0
## 24 0 1 0 0 1
## 25 0 1 0 0 0
## 26 0 1 0 0 0
## 27 0 1 0 1 0
## 28 0 1 0 1 0
## 29 0 1 0 0 0
## 30 0 1 0 0 0
## 31 0 1 0 0 1
## 32 0 1 0 0 0
## 33 0 1 0 1 0
## 34 0 1 0 0 1
## 35 0 1 0 1 0
## 36 0 1 0 0 1
## 37 0 1 0 1 0
## 38 0 1 0 0 1
## 39 1 0 0 1 0
## 40 1 0 0 0 0
## 41 1 0 0 0 0
## 42 1 0 0 1 0
## 43 1 0 0 0 0
## 44 1 0 0 0 0
## 45 1 0 0 0 0
## 46 1 0 0 1 0
## 47 1 0 0 1 0
## 48 1 0 0 0 0
## 49 1 0 0 0 0
## 50 1 0 0 0 0
## 51 1 0 0 0 0
## 52 1 0 0 0 1
## 53 1 0 0 0 0
## 54 1 0 0 0 1
## 55 1 0 0 0 0
## 56 1 0 0 0 0
## 57 1 0 0 0 0
## 58 1 0 0 0 0
## 59 1 0 0 0 0
## 60 1 0 0 0 0
## 61 1 0 0 0 0
## 62 1 0 0 0 0
## 63 1 0 0 1 0
## 64 1 0 0 0 1
## 65 1 0 0 0 0
## 66 1 0 0 0 1
## 67 1 0 0 1 0
## 68 1 0 0 0 0
## 69 1 0 0 1 0
## 70 1 0 0 0 0
## 71 0 0 1 0 1
## 72 0 0 1 0 0
## 73 0 0 1 1 0
## 74 0 0 1 0 1
## 75 0 0 1 0 0
## 76 0 0 1 0 1
## 77 0 0 1 1 0
## 78 0 0 1 0 0
## 79 0 0 1 0 0
## 80 0 0 1 0 0
## 81 0 0 1 0 0
## 82 0 0 1 0 0
## 83 0 0 1 0 1
## 84 0 0 1 0 0
## 85 0 0 1 0 1
## 86 0 0 1 0 0
## 87 0 0 1 0 1
## 88 0 0 1 0 0
## 89 0 0 1 0 0
## 90 0 0 1 0 0
## 91 0 0 1 0 0
## 92 0 0 1 1 0
## 93 0 0 1 1 0
## 94 0 0 1 0 1
## 95 0 0 1 0 0
## 96 0 0 1 1 0
## 97 0 0 1 0 1
## 98 0 0 1 0 1
## 99 0 0 1 1 0
## 100 0 0 1 0 0
## cuisine.3 cuisine.4 free_ship.1 free_ship.2 local_organic.1 local_organic.2
## 1 0 1 1 0 1 0
## 2 0 0 0 1 0 1
## 3 0 1 1 0 1 0
## 4 0 1 0 1 0 1
## 5 0 1 0 1 0 1
## 6 0 1 1 0 1 0
## 7 0 0 0 1 0 1
## 8 0 1 1 0 1 0
## 9 0 0 1 0 1 0
## 10 0 0 0 1 0 1
## 11 1 0 0 1 0 1
## 12 0 0 1 0 1 0
## 13 0 1 0 1 0 1
## 14 0 0 1 0 1 0
## 15 0 0 1 0 1 0
## 16 0 0 1 0 0 1
## 17 0 1 0 1 0 1
## 18 1 0 1 0 1 0
## 19 0 0 1 0 1 0
## 20 0 0 1 0 0 1
## 21 0 0 1 0 1 0
## 22 1 0 1 0 1 0
## 23 0 1 1 0 0 1
## 24 0 0 1 0 0 1
## 25 0 1 1 0 0 1
## 26 1 0 0 1 1 0
## 27 0 0 1 0 0 1
## 28 0 0 1 0 1 0
## 29 1 0 0 1 0 1
## 30 1 0 1 0 1 0
## 31 0 0 0 1 0 1
## 32 0 1 1 0 1 0
## 33 0 0 1 0 1 0
## 34 0 0 1 0 0 1
## 35 0 0 0 1 1 0
## 36 0 0 0 1 1 0
## 37 0 0 1 0 0 1
## 38 0 0 1 0 0 1
## 39 0 0 0 1 1 0
## 40 1 0 0 1 1 0
## 41 0 1 1 0 0 1
## 42 0 0 0 1 0 1
## 43 0 1 0 1 0 1
## 44 0 1 0 1 1 0
## 45 1 0 1 0 0 1
## 46 0 0 0 1 1 0
## 47 0 0 1 0 0 1
## 48 1 0 0 1 0 1
## 49 1 0 1 0 0 1
## 50 1 0 0 1 1 0
## 51 1 0 1 0 1 0
## 52 0 0 1 0 0 1
## 53 1 0 1 0 1 0
## 54 0 0 0 1 0 1
## 55 1 0 1 0 1 0
## 56 0 1 1 0 1 0
## 57 1 0 1 0 1 0
## 58 0 1 0 1 1 0
## 59 0 1 0 1 0 1
## 60 1 0 1 0 0 1
## 61 1 0 1 0 1 0
## 62 0 1 1 0 0 1
## 63 0 0 0 1 0 1
## 64 0 0 0 1 1 0
## 65 1 0 1 0 0 1
## 66 0 0 1 0 0 1
## 67 0 0 1 0 1 0
## 68 1 0 1 0 1 0
## 69 0 0 1 0 0 1
## 70 0 1 1 0 1 0
## 71 0 0 1 0 0 1
## 72 1 0 1 0 0 1
## 73 0 0 0 1 0 1
## 74 0 0 0 1 1 0
## 75 1 0 0 1 0 1
## 76 0 0 1 0 0 1
## 77 0 0 1 0 1 0
## 78 1 0 0 1 0 1
## 79 1 0 0 1 1 0
## 80 1 0 0 1 0 1
## 81 1 0 0 1 0 1
## 82 1 0 1 0 0 1
## 83 0 0 1 0 0 1
## 84 0 1 0 1 1 0
## 85 0 0 1 0 0 1
## 86 1 0 0 1 1 0
## 87 0 0 1 0 0 1
## 88 1 0 1 0 1 0
## 89 1 0 0 1 1 0
## 90 0 1 1 0 0 1
## 91 0 1 0 1 1 0
## 92 0 0 0 1 0 1
## 93 0 0 0 1 0 1
## 94 0 0 0 1 1 0
## 95 0 1 1 0 1 0
## 96 0 0 1 0 1 0
## 97 0 0 0 1 0 1
## 98 0 0 0 1 0 1
## 99 0 0 1 0 1 0
## 100 1 0 0 1 0 1
## prep_time.1 prep_time.2 prep_time.3 price.1 price.2 price.3
## 1 0 1 0 0 1 0
## 2 0 1 0 1 0 0
## 3 0 1 0 0 0 1
## 4 1 0 0 1 0 0
## 5 0 0 1 0 0 1
## 6 0 0 1 1 0 0
## 7 0 0 1 0 0 1
## 8 0 0 1 0 0 1
## 9 1 0 0 1 0 0
## 10 0 0 1 1 0 0
## 11 1 0 0 0 0 1
## 12 1 0 0 1 0 0
## 13 0 0 1 1 0 0
## 14 0 1 0 0 0 1
## 15 0 1 0 0 1 0
## 16 1 0 0 0 0 1
## 17 0 1 0 1 0 0
## 18 0 1 0 1 0 0
## 19 1 0 0 0 0 1
## 20 0 1 0 0 0 1
## 21 1 0 0 0 0 1
## 22 0 0 1 1 0 0
## 23 0 1 0 0 0 1
## 24 1 0 0 0 0 1
## 25 0 0 1 1 0 0
## 26 1 0 0 0 0 1
## 27 1 0 0 1 0 0
## 28 0 0 1 0 1 0
## 29 1 0 0 1 0 0
## 30 1 0 0 1 0 0
## 31 1 0 0 1 0 0
## 32 1 0 0 0 0 1
## 33 0 0 1 1 0 0
## 34 1 0 0 1 0 0
## 35 0 0 1 1 0 0
## 36 0 0 1 0 1 0
## 37 0 0 1 1 0 0
## 38 0 1 0 0 0 1
## 39 1 0 0 0 1 0
## 40 0 0 1 0 0 1
## 41 0 0 1 0 0 1
## 42 0 1 0 0 1 0
## 43 0 0 1 1 0 0
## 44 1 0 0 1 0 0
## 45 0 0 1 0 0 1
## 46 0 0 1 0 1 0
## 47 0 1 0 0 0 1
## 48 1 0 0 0 0 1
## 49 0 1 0 0 1 0
## 50 0 0 1 0 0 1
## 51 0 0 1 0 0 1
## 52 1 0 0 1 0 0
## 53 1 0 0 0 0 1
## 54 0 1 0 1 0 0
## 55 0 1 0 1 0 0
## 56 0 0 1 0 0 1
## 57 0 0 1 0 0 1
## 58 1 0 0 0 1 0
## 59 0 1 0 0 0 1
## 60 0 1 0 1 0 0
## 61 0 0 1 0 1 0
## 62 1 0 0 0 1 0
## 63 0 0 1 1 0 0
## 64 0 1 0 1 0 0
## 65 0 1 0 0 0 1
## 66 0 1 0 1 0 0
## 67 0 1 0 0 1 0
## 68 0 1 0 0 1 0
## 69 0 1 0 0 1 0
## 70 1 0 0 0 0 1
## 71 0 0 1 1 0 0
## 72 1 0 0 0 0 1
## 73 1 0 0 0 0 1
## 74 1 0 0 0 1 0
## 75 1 0 0 1 0 0
## 76 0 0 1 0 0 1
## 77 1 0 0 1 0 0
## 78 1 0 0 0 0 1
## 79 0 0 1 0 0 1
## 80 1 0 0 0 0 1
## 81 0 1 0 1 0 0
## 82 0 0 1 0 0 1
## 83 1 0 0 1 0 0
## 84 1 0 0 0 1 0
## 85 1 0 0 1 0 0
## 86 0 0 1 0 1 0
## 87 1 0 0 0 0 1
## 88 0 1 0 1 0 0
## 89 0 0 1 1 0 0
## 90 1 0 0 1 0 0
## 91 0 1 0 0 1 0
## 92 1 0 0 1 0 0
## 93 0 1 0 0 0 1
## 94 1 0 0 0 1 0
## 95 0 0 1 1 0 0
## 96 1 0 0 1 0 0
## 97 0 1 0 1 0 0
## 98 1 0 0 0 0 1
## 99 0 0 1 0 0 1
## 100 0 1 0 0 1 0#write.csv(sunbasket_dummy, file = '~/sunbasket_dummy.csv', row.names = T)