#----------------------------------------------------------------------
# CE301 - Estatística Básica
# PRÁTICAS EM R
#----------------------------------------------------------------------
# Prof. Me. Lineu Alberto Cavazani de Freitas
#-----------------------------------------------------------------------
# Execute os seguintes comandos no R
# Discuta o que os comandos fazem e comente o código
#-----------------------------------------------------------------------

10 + 5
9 - 1
8 * 3
25/5
5^2

10 %% 3
10 %/% 3

sin(0)
cos(0)
tan(0)

exp(1)

sqrt(25)

log(2.71)
log10(10)
log2(2)
log(10, base = 10)

factorial(4)
abs(-5)

ceiling(1.98746541)
floor(1.98746541)
round(1.98746541)
round(1.98746541, digits = 2)

1 == 6
2 != 5

3 <= 4
4 >= 3

5 > 2
6 < 1

(4 < 5) & (1 >= 2)
(8 < 0) | (0 >= 3)

!(2 < 5)

1+NA
1+NULL
1+Inf
1-Inf
1+NaN

1/0
-1/0
0/0

1+2*3
1+(2*3)
(1+2)*3

x <- 10
x+1
x*2
x^2
x-x

a <- c(7,5,6,9,7,1,2,3,6,4)
a

b <- c(1,6,7,5,9,7,7,9,9,4)
b

a+b
a*b
a/b
a%*%b

sum(a)
prod(a)

barplot(a)
barplot(b)

a %% 3
a %/% 3

cbind(a, a%/%3, a%%3)

(a > 5)
(b > 5) 
(a > 5) & (b > 5) 
(a > 5) | (b > 5)
xor((a > 5),(b > 5))


#-----------------------------------------------------------------------