Capítulo 2 Introdução relâmpago ao software R

Como a seção já sugere, segue alguns comandos básicos para conseguirmos acompanhar o curso.

# -----------------------------------------------------------------------------
# Como instalar pacotes
# -----------------------------------------------------------------------------
#install.packages('descr')

# -----------------------------------------------------------------------------
# Como remover pacotes
# ----------------------------------------------------------------------------- 
#remove.packages('descr')

# -----------------------------------------------------------------------------
# Carregar e listar os conteúdos dos pacotes
# -----------------------------------------------------------------------------
library(fdth)

# -----------------------------------------------------------------------------
# Ajuda (socorro)
# -----------------------------------------------------------------------------
help(round)#ou de modo mais simplificado
?round

# -----------------------------------------------------------------------------
# Operadores de atribuição
# -----------------------------------------------------------------------------
# =
a = 3

# -----------------------------------------------------------------------------
# Imprimir no console uma mensagem ou o valor de uma variável:
# -----------------------------------------------------------------------------
print(a) # ou simplesmente
a

# -----------------------------------------------------------------------------
# Operadores matemáticos
# -----------------------------------------------------------------------------
# + soma
# - subtração
# * multiplicação
# / divisão
# ^ potenciação
# %% operador modular

2 + 1
3 - 5
3 * 9
4/8
5^(1 + 1)
5^1 + 1
6 * (5 + 3)
3%%2
4%%2
5%%2

# -----------------------------------------------------------------------------
# Vetores
# -----------------------------------------------------------------------------
# Algumas das diversas formas de criar:

#c() - é uma função
# vetores numéricos
c(1.54, 1.75, 1.60, 1.60, 1.73, 1.63, 1.52, 1.79, 1.64, 1.60, 1.60, 1.61, 1.59, 1.77)

altura = c(1.54, 1.75, 1.60, 1.60, 1.73, 1.63, 1.52, 1.79, 1.64, 1.60, 1.60, 1.61, 1.59, 1.77)
altura
peso = c(56, 73, 50, 70, 57, 55, 78, 50)
peso

mean(peso)
var(peso)
sd(peso)

hist(peso)

# vetores de strings
c('coca', 'pepsi') # pode criar um vetor com strings

estcivil = c('solt','solt','casad','solt','casad',"solt")
estcivil

# Algumas formas de indexar (índices):
x = seq(1,20,by = 2)
x

x[2]

# -----------------------------------------------------------------------------
# Data Frames
# -----------------------------------------------------------------------------
x = rnorm(10,
          10,
          2)
x
class(x)          

y = letters[1:10]
y
class(y)
mean(y)

sexo = c('f','f','m','f','m','m','m','m','m','f')

#data.frame()
dF = data.frame(x,
                y,
                sexo)
dF
class(dF)
# A instrução 'summary' sumariza um objeto (aqui, um frame, mas vai bem com
# quase todos objetos):
summary(dF)

## Indexação!
# Opção 1
dF$x
dF$y

# Opção 2
dF[ ,1]
dF[ ,2]

dF[3:5,1]

# Pode-se mudar o nome das linhas ou das colunas:
names(dF) = c('ivan',
              'joao',
              'leila')
dF

# Opção melhor
with(dF,
     mean(x))

with(dF,
     sort(x))

# -----------------------------------------------------------------------------
# Outras funções
# -----------------------------------------------------------------------------  
x = c(1.73, 1.43, 2.1, 4.3, 5.1)
x

length(x)       # Número de elementos

min(x)

max(x)

sort(x)         # Ordena os valores dentro de um vetor

sort(x,
     decreasing = TRUE)

median(x)       # Mediana

mean(x)         # Média

var(x)          # Variância

sd(x)           # Desvio padrão (standard deviation)

sqrt(var(x))    # raiz quadrada

sum(x)          # Somatório

round(x)        # Arrendondar

round(x,
      digits = 1)

round(x,
      1)

# -----------------------------------------------------------------------------
# Gráficos
# -----------------------------------------------------------------------------
# Será utilizado a library default do R, a 'Graphics'. Existem outras
# bibliotecas, como: lattice, ggplot2, etc. 
x = seq(1, 10)
x
y = 3 + x
y

plot(y ~ x)# ou
plot(x, y)
 
# Fazendo um gráfico um pouquinho mais elaborado!
plot(y ~ x,
     main = 'Exemplo 1',
     xlab = 'Variável x',
     ylab = 'Variável y',
     col = 'red',
     type = 'p',
     sub = 'VASCÃO')               

# Listando todas as cores dispníveis para uso em gráficos.
colors()  # Descobrir as cores disponíveis