title: “BAB 2 Import data”
author: “Ela Ilmatul Hidayah”
date: “2022-10-11” output: html_document
library(readxl)
data = read_excel('Proporsi Individu Yang Menggunakan Internet Menurut Provinsi.xlsx')
data
## # A tibble: 40 × 4
## Provinsi `2017` `2018` `2019`
## <chr> <chr> <chr> <chr>
## 1 <NA> <NA> <NA> <NA>
## 2 ACEH 22.86 30.69 35.60
## 3 SUMATERA UTARA 27.63 34.27 41.38
## 4 SUMATERA BARAT 29.63 36.49 41.15
## 5 RIAU 32.16 39.98 44.97
## 6 JAMBI 26.67 35.82 42.68
## 7 SUMATERA SELATAN 25.65 33.35 38.14
## 8 BENGKULU 26.71 32.66 40.72
## 9 LAMPUNG 22.45 32.41 40.17
## 10 KEP. BANGKA BELITUNG 28.86 37.33 45.85
## # … with 30 more rows
names(data)
## [1] "Provinsi" "2017" "2018" "2019"
str(data)
## tibble [40 × 4] (S3: tbl_df/tbl/data.frame)
## $ Provinsi: chr [1:40] NA "ACEH" "SUMATERA UTARA" "SUMATERA BARAT" ...
## $ 2017 : chr [1:40] NA "22.86" "27.63" "29.63" ...
## $ 2018 : chr [1:40] NA "30.69" "34.27" "36.49" ...
## $ 2019 : chr [1:40] NA "35.60" "41.38" "41.15" ...
head(data)
## # A tibble: 6 × 4
## Provinsi `2017` `2018` `2019`
## <chr> <chr> <chr> <chr>
## 1 <NA> <NA> <NA> <NA>
## 2 ACEH 22.86 30.69 35.60
## 3 SUMATERA UTARA 27.63 34.27 41.38
## 4 SUMATERA BARAT 29.63 36.49 41.15
## 5 RIAU 32.16 39.98 44.97
## 6 JAMBI 26.67 35.82 42.68
tail(data)
## # A tibble: 6 × 4
## Provinsi `2017` `2018` `2019`
## <chr> <chr> <chr> <chr>
## 1 "PAPUA" 16.51 19.59 21.70
## 2 "INDONESIA" 32.34 39.90 47.69
## 3 <NA> <NA> <NA> <NA>
## 4 "\r\nSumber :BPS, Survei Sosial Ekonomi Nasional (SUSENA… <NA> <NA> <NA>
## 5 "Source Url: https://www.bps.go.id/indicator/27/1225/1/p… <NA> <NA> <NA>
## 6 "Access Time: October 16, 2022, 1:35 pm" <NA> <NA> <NA>
summary(data)
## Provinsi 2017 2018 2019
## Length:40 Length:40 Length:40 Length:40
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character