input_data2.R

# Cara input atau impor data dari file notepad (txt) ke R
data_stunting2 = read.delim(file.choose(), header = TRUE)
View(data_stunting2)
str(data_stunting2)

## 'data.frame':    802 obs. of  12 variables:
##  $ id       : chr  "B0001" "B0002" "B0003" "B0004" ...
##  $ kode_kec : chr  "K16" "K03" "K12" "K03" ...
##  $ kecamatan: chr  "Kecamatan P" "Kecamatan C" "Kecamatan L" "Kecamatan C" ...
##  $ jk       : int  2 1 1 2 2 1 1 2 2 2 ...
##  $ umur_bln : int  2 37 8 14 29 53 34 48 46 15 ...
##  $ tb_cm    : num  48 83.7 68.6 77.8 82.8 98 94.1 93 100 71.9 ...
##  $ bb_kg    : num  3.9 8.9 9.2 9.4 12.6 14.9 14.2 12.6 14.7 7.8 ...
##  $ cara_ukur: chr  "L" "H" "L" "L" ...
##  $ bblr     : chr  "Ya" "Ya" "Tidak" "Tidak" ...
##  $ asi_eks  : chr  "Tidak" "Tidak" "Ya" "Tidak" ...
##  $ pend_ibu : chr  "SD ke bawah" "SMP" "SMA" "SMA" ...
##  $ sanitasi : chr  "Tidak layak" "Tidak layak" "Tidak layak" "Layak" ...

head(data_stunting2)

##      id kode_kec   kecamatan jk umur_bln tb_cm bb_kg cara_ukur  bblr asi_eks
## 1 B0001      K16 Kecamatan P  2        2  48.0   3.9         L    Ya   Tidak
## 2 B0002      K03 Kecamatan C  1       37  83.7   8.9         H    Ya   Tidak
## 3 B0003      K12 Kecamatan L  1        8  68.6   9.2         L Tidak      Ya
## 4 B0004      K03 Kecamatan C  2       14  77.8   9.4         L Tidak   Tidak
## 5 B0005      K03 Kecamatan C  2       29  82.8  12.6         H Tidak      Ya
## 6 B0006      K10 Kecamatan J  1       53  98.0  14.9         H Tidak   Tidak
##      pend_ibu    sanitasi
## 1 SD ke bawah Tidak layak
## 2         SMP Tidak layak
## 3         SMA Tidak layak
## 4         SMA       Layak
## 5 SD ke bawah Tidak layak
## 6         SMA Tidak layak

tail(data_stunting2)

##        id kode_kec   kecamatan jk umur_bln tb_cm bb_kg cara_ukur  bblr asi_eks
## 797 B0797      K07 Kecamatan G  2       53 100.9  17.3         H    Ya   Tidak
## 798 B0798      K11 Kecamatan K  1       21  83.2  13.7         L Tidak      Ya
## 799 B0799      K14 Kecamatan N  1       38  91.4  14.0         H Tidak   Tidak
## 800 B0800      K10 Kecamatan J  2       54  99.9  14.5         H Tidak      Ya
## 801 B0015      K13 Kecamatan M  1       21  79.1  11.0         L Tidak   Tidak
## 802 B0230      K13 Kecamatan M  2       44  95.9  14.7         H Tidak      Ya
##        pend_ibu    sanitasi
## 797 SD ke bawah Tidak layak
## 798         SMP       Layak
## 799         SMP       Layak
## 800 SD ke bawah       Layak
## 801         SMA       Layak
## 802         SMA Tidak layak

mean(data_stunting2$umur_bln)

## [1] 29.99751