Operações Básicas no R

Author

Andriane

AULA 3 - Operaçôes básicas no R

2026.2

Andriane Penha Camilo

Aluna do curso de graduação em Meteorologia

UFSM

Códigos Referentes ao Capítulo 5 do Livro de ADAR

—————————————————————————–

1:5
[1] 1 2 3 4 5

Precedência de Operadores Matemáticos Padrão

15 + 6^3/2 - pi
[1] 119.8584

Alteração de Precedência usando Parênteses:

15 + ((6^3)/2) - pi  
[1] 119.8584
(15 + 6^3)/2 - pi
[1] 112.3584
15 + 6^3/(2 - pi)
[1] -174.2093
15 + 6^(3/2) - pi
[1] 26.55535

Resto da Divisão Inteira (Módulo)

12 %% 5
[1] 2
14 %% 3
[1] 2

Divisão Tradicional e Divisão Inteira (Quociente)

15 / 4
[1] 3.75
15 %/% 4
[1] 3

Divisão Decimal Padrão

8/100000
[1] 8e-05

Notação Científica (Exponencial de Base 10)

8e-5 
[1] 8e-05
8E-5 
[1] 8e-05
8*10^-5 
[1] 8e-05

Configuração Globais de Exibição de Dígitos Decimais

pi 
[1] 3.141593
getOption("digits") 
[1] 7
pi 
[1] 3.141593
# alterando para 12 
options(digits = 12) 
pi 
[1] 3.14159265359
getOption("digits") 
[1] 12

Redefinindo para o número de casas decimais padrão:

options(digits = 7) 
getOption("digits") 
[1] 7
pi 
[1] 3.141593

Tratamento de Limites, Valores Faltantes (NA) e Vetores

exp(-Inf) 
[1] 0
exp(Inf) 
[1] Inf
plot(x = -5:5, y = exp(-5:5), type = "o") 

(0:1)^Inf 
[1] 0 1
0/Inf 
[1] 0
0/50 
[1] 0
(-1*Inf)^0 
[1] 1
50^0 
[1] 1
(c(-1, 1)*Inf)^0 
[1] 1 1
0^0 
[1] 1
# NA: valor faltante 
NA + 7 
[1] NA
exp(NA) 
[1] NA
NA/NaN 
[1] NA
vogais_juntas <- "aeiou" 
vogais_sep <- c("a", "e", "i", "o", "u") # vetor 
vogais_sep
[1] "a" "e" "i" "o" "u"
# vetor com 6 valores de temperatura 
temp6h <- c(19, 21, 20.5, 22, NA, NA) 
temp6h 
[1] 19.0 21.0 20.5 22.0   NA   NA
mean(temp6h, na.rm = TRUE) 
[1] 20.625

Funções Matemáticas, Trigonométricas e Substituição de Texto

# cosseno de 45° 
ang <- 45 # graus 
ang_rad <- ang * pi/180 # radianos 
cos(ang_rad) 
[1] 0.7071068
# raiz quadrada de 64 
sqrt(64) 
[1] 8
sqrt(x = 64) 
[1] 8
log(8, 2) 
[1] 3
log(x = 8, base = 2) # com argumentos explícitos 
[1] 3
log(base = 2, x = 8) # pode trocar ordem 
[1] 3
log(2, 8) # pode trocar ordem 
[1] 0.3333333
# pq é importante escrever o nome dos argumentos na chamada de uma funcao
# deixa o script mais facil de entender
gsub("aeiou", "x", "_") 
[1] "_"
# função para substituir uma string por outra 
gsub(pattern = "x", replacement = "_", x = "aeiou") 
[1] "aeiou"
?gsub 



# exponencial de 2 
exp(2) 
[1] 7.389056
# fatorial de 5 (5*4*3*2*1) 
factorial(5) 
[1] 120

Consulta de Documentação (Ajuda)

# logaritmo natural de 20 
?log 
Ajuda sobre o tópico 'log' foi encontrada nos seguintes pacotes:

  Package               Library
  otel                  /home/aluno/R/x86_64-pc-linux-gnu-library/4.6
  base                  /usr/lib/R/library


Usando a primeira correspondência ...

Cálculo de Logaritmos em Diferentes Bases

log(x = 8, base = 2) # logaritmo 8 na base 2 
[1] 3
log10(1000) # forma equivalente logaritmo 1000 na base 10
[1] 3

Consulta de Documentação Avançada (Argumentos de Ajuda)

?atan2

Atribuição e Exibição de Variáveis (Print)

m <- 250 
# para mostrar a variável digite o nome da variável m 
m 
[1] 250
# ou use a função print() 
print(m) 
[1] 250

Demonstração de Sensibilidade a Maiúsculas (Case-Sensitivity)

m 
[1] 250
M 
Error:
! objeto 'M' não encontrado

Atribuição Simultânea com Exibição de Resultado

g <- 9.8 # não imprime nada 
g # digitando o nome da variável também mostra o valor de g 
[1] 9.8
(g <- 9.8) # a mesma chamada com parênteses define e mostra o valor de g 
[1] 9.8
## ---- echo = FALSE, eval = TRUE----------------------------------------------- 
g <- 9.8 # não imprime nada 


## ----chunk31a----------------------------------------------------------------- 
(p <- m * g) 
[1] 2450

Listagem de Objetos na Memória Ativa (Workspace)

ls() 
[1] "ang"           "ang_rad"       "g"             "m"            
[5] "p"             "temp6h"        "vogais_juntas" "vogais_sep"

Remoção Unitária de Variáveis da Memória

rm(m) 
ls() 
[1] "ang"           "ang_rad"       "g"             "p"            
[5] "temp6h"        "vogais_juntas" "vogais_sep"

Remoção Múltipla de Variáveis da Memória

rm(g, p, temp6h) 
ls() 
[1] "ang"           "ang_rad"       "vogais_juntas" "vogais_sep"

Limpeza Completa da Memória do R (Reset de Ambiente)

rm(list = ls()) 
## ls() 
m <- 250 
g <- 9.8 
p <- m * g 
p <- 40

Teste de Nomes Inválidos para Variáveis (Gera Erros)

2oAno <- 2020 
raizDe5 <- sqrt(5) 
variavel teste <- 89 
Error in parse(text = input): <text>:1:2: unexpected symbol
1: 2oAno
     ^

Boas Práticas na Criação de Nomes de Variáveis Válidos

ano2 <- 2020 
variavel_teste <- 89 
variavel.teste <- 90

Erros por Uso de Caracteres Reservados (Operadores) em Nomes

#^, !, $, @, +, -, /, ou * 
item-1 <- 5 
Error:
! objeto 'item' não encontrado
# alternativa 
item_1 <- 5 

item-1 <- 5 
Error:
! objeto 'item' não encontrado
# alternativa 
item_1 <- 5

Atribuição de Strings (Textos) com Caracteres Especiais

outono <- "MAM" 
outono 
[1] "MAM"