2^5
1:20
1:50
a <- 1:10
a
ls()
ls.str()
b = pi/2
b
e
exp(1)
exp(1) -> e
ls()
ls.str()
a
e
rm(e)
ls()
rm(list=ls())
ls()
q()
getwd()
?getwd
?setwd
?sqrt
?exp
?q
a
ls()
a^4
a=4
a
b=7
a*b
b^2
sqrt(b^2)
sqrt(b^2*a)
b^2*a
(b^2) * a
2^1023
log(2^1023)
log(2^1023, 2)
?log
log(2^1023, pi)
log(2^1023)
log2(2^1023)
2^1024
6 / 2
6 / pi
round( 6 / pi, 2)
round( 6 / pi, 4)
6 %% 4
15 %% 3
15 %% 5
15 %% 7
16 %/% 3
sin(pi/2)
sin(90 * pi/180)
sin.d
sin.g <- function(x) x * pi/180  
ls()
ls.str()
sin.g(180)
sin.g <- function(x) sin(x * pi/180)  
sin.g(180)
sin.g(90)
sqrt(9)
sqrt <- function(x) x^3
sqrt(9)
rm(sqrt)
sqrt(9)
sqrt(-1)
sqrt(-1 + 0i)
sqrt(-1 + 0i) -> a
a
a ^2
a + 3
(a + 3 )^2
(a + 3 )^2 -> b
b
a
b
plot(a)
abline(h=0); abline(v=0)
plot(a, xlim=c(-10, 10), ylim=c(-10,10) 
)
plot(a, xlim=c(-10, 10), ylim=c(-10,10) )
grid()
abs(a)
abs(b)
plot(a, xlim=c(-2,2), ylim=c(-2,2) )
grid()
plot(b, xlim=c(-2,2), ylim=c(-2,2) )
plot(b, xlim=c(-10,10), ylim=c(-10,10) )
a = 2
b= 3
c = a
a == b
a == b -1
a == b -1  -> test
test
!test
! (!test )
x = 1:10
x
x^2
x > pi 
x
q()
