四則計算

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