baitap

trong tập dữ liệu này gồm 308854 dòng và 19 biến - General_Health : tình trạng sưc khỏe của người được hỏi

• Checkup : Lần cuối khám bệnh

• Exercise : trong tháng trừ công việc thường xuyên có tham gia hoạt động thể chất khác không

• Heart_Disease :Những người được hỏi báo cáo mắc bệnh tim mạch vành hoặc nhồi máu cơ tim

• skin_cancer : Những người được hỏi báo cáo bị ung thư da

• Other_cancer : Những người được hỏi báo cáo có bất kỳ loại ung thư nào khác

• Depression : Những người được hỏi báo cáo bị rối loạn trầm cảm (bao gồm trầm cảm, trầm cảm nặng, rối loạn khí sắc hoặc trầm cảm nhẹ)

• Diabetes :Những người được hỏi báo cáo rằng có một bệnh tiểu đường. Nếu có, đó là/đã từng là loại bệnh tiểu đường nào.

• Arthritis : Những người được hỏi báo cáo bị viêm khớp

• sex :giới tính

• Age_category :độ tuổi

• Height .cm : chiều cao theo cm

• Weight_.kg : cân nặng theo kilogram -BMI ; chỉ số BMI

• Smoking_History : có từng hút thuốc chưa

• Alcohol_consumption

• Fruit_consumption

• Green_Vegetables_consumption

• FriedPotato_Consumption đường link file data :https://drive.google.com/file/d/1C9aDa5d2s24eAoJlSg5qYCR4R7j9n5lc/view?usp=drive_link

library(DT)

## Warning: package 'DT' was built under R version 4.2.3

cvs <- read.csv("CVD_cleaned.csv")
head(cvs)

##   General_Health                 Checkup Exercise Heart_Disease Skin_Cancer
## 1           Poor Within the past 2 years       No            No          No
## 2      Very Good    Within the past year       No           Yes          No
## 3      Very Good    Within the past year      Yes            No          No
## 4           Poor    Within the past year      Yes           Yes          No
## 5           Good    Within the past year       No            No          No
## 6           Good    Within the past year       No            No          No
##   Other_Cancer Depression Diabetes Arthritis    Sex Age_Category Height_.cm.
## 1           No         No       No       Yes Female        70-74         150
## 2           No         No      Yes        No Female        70-74         165
## 3           No         No      Yes        No Female        60-64         163
## 4           No         No      Yes        No   Male        75-79         180
## 5           No         No       No        No   Male          80+         191
## 6           No        Yes       No       Yes   Male        60-64         183
##   Weight_.kg.   BMI Smoking_History Alcohol_Consumption Fruit_Consumption
## 1       32.66 14.54             Yes                   0                30
## 2       77.11 28.29              No                   0                30
## 3       88.45 33.47              No                   4                12
## 4       93.44 28.73              No                   0                30
## 5       88.45 24.37             Yes                   0                 8
## 6      154.22 46.11              No                   0                12
##   Green_Vegetables_Consumption FriedPotato_Consumption
## 1                           16                      12
## 2                            0                       4
## 3                            3                      16
## 4                           30                       8
## 5                            4                       0
## 6                           12                      12

datatable(cvs) 

## Warning in instance$preRenderHook(instance): It seems your data is too big for
## client-side DataTables. You may consider server-side processing:
## https://rstudio.github.io/DT/server.html