四則計算
3+3
## [1] 6
3-3
## [1] 0
3*3
## [1] 9
3/3
## [1] 1
データ読み込み
library(readxl)
asia <- read_excel("asia.xlsx")
head(asia)
## # A tibble: 6 × 10
## countrycode country year rgdpe pop ctfp percapitaGDP oecd G7 asia
## <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 CHN China 2019 2.01e7 1.43e3 0.400 13988. 0 0 1
## 2 JPN Japan 2019 5.03e6 1.27e2 0.635 39637. 1 1 1
## 3 KOR Republic… 2019 2.09e6 5.12e1 0.604 40819. 1 0 1
## 4 PHL Philippi… 2019 8.87e5 1.08e2 0.507 8205. 0 0 1
## 5 SGP Singapore 2019 5.14e5 5.80e0 0.691 88619. 0 0 1
## 6 THA Thailand 2019 1.22e6 6.96e1 0.455 17558. 0 0 1