#------------------#
#スライド 30
#------------------#
1 + 2



#------------------#
#スライド 31
#------------------#
1 + 2 + 3 + 4 + 
5 + 6 + 7 + 8



#------------------#
#スライド 33
#------------------#
(1+9+7+9)+(0+4)+(2+4) + (2+0+1+0)+(0+9)+(2+5)



#------------------#
#スライド 36
#------------------#
1 + 2         #足し算 
1 + 2 - 1     #引き算 
2 * 4         #掛け算
4 / 2         #割り算
3 ^ 3         #累乗 
3 ** 3        #累乗



#------------------#
#スライド 37
#------------------#
x <- 1 + 2
x

x <- 1
y <- 2
x + y



#------------------#
#スライド 38
#------------------#
x <- 2
x

x <- 100
x
rm(list=ls(all=TRUE))   #オブジェクトの消去



#------------------#
#スライド 39
#------------------#
x1 <- 3
X1

1x <- 3

if <- 3