library(psych)Appending data
Loading packages
Renaming data frames
FOOD.DATA.GROUP1 <- read.csv("~/Downloads/FOOD-DATA-GROUP1.csv")
FOOD.DATA.GROUP2 <- read.csv("~/Downloads/FOOD-DATA-GROUP2.csv")
FOOD.DATA.GROUP3 <- read.csv("~/Downloads/FOOD-DATA-GROUP3.csv")
FOOD.DATA.GROUP4 <- read.csv("~/Downloads/FOOD-DATA-GROUP4.csv")
FOOD.DATA.GROUP5 <- read.csv("~/Downloads/FOOD-DATA-GROUP5.csv")
df1 <- FOOD.DATA.GROUP1
df2 <- FOOD.DATA.GROUP2
df3 <- FOOD.DATA.GROUP3
df4 <- FOOD.DATA.GROUP4
df5 <- FOOD.DATA.GROUP5
products <- read.csv("~/Downloads/products.csv")
sales <- read.csv("~/Downloads/sales.csv")Appending the data
combined_data <- rbind(df1,
df2,
df3,
df4,
df5)
psych::describe(combined_data) vars n mean sd median trimmed mad min
X 1 2395 272.26 182.89 241.00 261.06 209.05 0
Unnamed..0 2 2395 272.26 182.89 241.00 261.06 209.05 0
food* 3 2395 1198.00 691.52 1198.00 1198.00 888.08 1
Caloric.Value 4 2395 223.77 384.73 117.00 153.80 128.99 0
Fat 5 2395 10.18 29.01 2.10 4.59 3.01 0
Saturated.Fats 6 2395 3.92 19.50 0.50 1.34 0.74 0
Monounsaturated.Fats 7 2395 4.13 12.94 0.50 1.68 0.74 0
Polyunsaturated.Fats 8 2395 2.15 7.15 0.40 0.89 0.59 0
Carbohydrates 9 2395 18.59 29.41 6.80 12.18 10.08 0
Sugars 10 2395 4.46 13.34 0.09 1.61 0.13 0
Protein 11 2395 13.40 32.29 3.50 7.04 4.89 0
Dietary.Fiber 12 2395 2.24 5.40 0.20 1.02 0.30 0
Cholesterol 13 2395 62.17 385.35 0.00 14.71 0.00 0
Sodium 14 2395 0.29 1.12 0.09 0.16 0.11 0
Water 15 2395 83.81 117.12 39.60 65.77 58.27 0
Vitamin.A 16 2395 0.77 11.12 0.00 0.01 0.00 0
Vitamin.B1 17 2395 0.20 0.85 0.06 0.09 0.08 0
Vitamin.B11 18 2395 0.19 4.17 0.05 0.05 0.05 0
Vitamin.B12 19 2395 0.04 0.51 0.00 0.02 0.00 0
Vitamin.B2 20 2395 0.20 0.88 0.07 0.10 0.10 0
Vitamin.B3 21 2395 2.97 8.14 0.60 1.28 0.87 0
Vitamin.B5 22 2395 0.96 3.23 0.20 0.43 0.30 0
Vitamin.B6 23 2395 0.31 0.84 0.09 0.16 0.14 0
Vitamin.C 24 2395 7.85 82.77 0.06 1.20 0.10 0
Vitamin.D 25 2395 2.19 12.47 0.00 0.01 0.00 0
Vitamin.E 26 2395 0.47 1.66 0.00 0.15 0.01 0
Vitamin.K 27 2395 0.20 3.45 0.01 0.03 0.01 0
Calcium 28 2395 52.05 115.93 13.90 26.22 20.61 0
Copper 29 2395 9.58 69.91 0.10 0.64 0.15 0
Iron 30 2395 1.85 5.16 0.60 0.96 0.83 0
Magnesium 31 2395 34.43 71.93 10.40 18.64 15.12 0
Manganese 32 2395 5.35 21.01 0.20 0.71 0.30 0
Phosphorus 33 2395 156.24 333.26 42.30 87.11 62.63 0
Potassium 34 2395 303.83 589.51 112.30 184.78 156.41 0
Selenium 35 2395 52.26 199.26 0.05 3.15 0.05 0
Zinc 36 2395 1.58 4.94 0.30 0.64 0.44 0
Nutrition.Density 37 2395 106.93 173.02 53.84 74.16 63.51 0
max range skew kurtosis se
X 721.0 721.0 0.46 -0.77 3.74
Unnamed..0 721.0 721.0 0.46 -0.77 3.74
food* 2395.0 2394.0 0.00 -1.20 14.13
Caloric.Value 6077.0 6077.0 7.01 74.66 7.86
Fat 550.7 550.7 9.28 123.52 0.59
Saturated.Fats 672.0 672.0 22.03 654.12 0.40
Monounsaturated.Fats 291.1 291.1 11.01 180.79 0.26
Polyunsaturated.Fats 188.0 188.0 12.30 238.45 0.15
Carbohydrates 390.2 390.2 3.43 20.60 0.60
Sugars 291.5 291.5 9.59 154.69 0.27
Protein 560.3 560.3 8.96 120.41 0.66
Dietary.Fiber 76.5 76.5 5.65 44.77 0.11
Cholesterol 10509.0 10509.0 20.30 480.64 7.87
Sodium 49.4 49.4 35.95 1563.13 0.02
Water 1875.9 1875.9 5.04 53.64 2.39
Vitamin.A 362.7 362.7 20.61 535.97 0.23
Vitamin.B1 25.0 25.0 18.06 423.68 0.02
Vitamin.B11 177.6 177.6 37.98 1507.21 0.09
Vitamin.B12 25.0 25.0 48.33 2352.49 0.01
Vitamin.B2 35.0 35.0 28.74 1068.43 0.02
Vitamin.B3 124.0 124.0 8.15 94.96 0.17
Vitamin.B5 74.3 74.3 13.19 241.60 0.07
Vitamin.B6 15.8 15.8 9.05 114.81 0.02
Vitamin.C 3872.0 3872.0 42.74 1981.27 1.69
Vitamin.D 217.6 217.6 9.28 106.84 0.25
Vitamin.E 41.6 41.6 11.91 221.77 0.03
Vitamin.K 166.4 166.4 46.77 2246.80 0.07
Calcium 1283.5 1283.5 5.18 34.09 2.37
Copper 1890.0 1890.0 20.73 505.38 1.43
Iron 121.2 121.2 12.67 239.15 0.11
Magnesium 921.6 921.6 5.10 35.46 1.47
Manganese 451.0 451.0 8.85 122.32 0.43
Phosphorus 5490.0 5490.0 7.35 89.43 6.81
Potassium 11336.9 11336.9 7.00 86.22 12.05
Selenium 3308.0 3308.0 6.87 70.41 4.07
Zinc 147.3 147.3 14.26 346.05 0.10
Nutrition.Density 3911.4 3911.4 7.07 108.44 3.54
Merging Data
describe(right_join_df) vars n mean sd median trimmed mad
Product_ID 1 829262 15.01 9.87 14.0 14.65 11.86
Product_Name* 2 829262 15.01 9.87 14.0 14.65 11.86
Product_Category* 3 829262 3.04 1.55 3.0 3.05 2.97
Product_Cost* 4 829262 8.47 5.18 9.0 8.47 7.41
Product_Price* 5 829262 8.39 5.07 7.0 8.09 4.45
Sale_ID 6 829262 414631.50 239387.46 414631.5 414631.50 307365.96
Date* 7 829262 344.93 179.90 362.0 349.78 223.87
Store_ID 8 829262 25.28 14.35 26.0 25.25 17.79
Units 9 829262 1.32 0.83 1.0 1.09 0.00
min max range skew kurtosis se
Product_ID 1 35 34 0.26 -1.21 0.01
Product_Name* 1 35 34 0.26 -1.21 0.01
Product_Category* 1 5 4 -0.07 -1.48 0.00
Product_Cost* 1 16 15 -0.03 -1.36 0.01
Product_Price* 1 18 17 0.50 -1.01 0.01
Sale_ID 1 829262 829261 0.00 -1.20 262.88
Date* 1 638 637 -0.20 -1.13 0.20
Store_ID 1 50 49 0.00 -1.21 0.02
Units 1 30 29 4.50 48.05 0.00