Exercício 1) - Dadas 3 variáveis com valores numéricos, apresentar o resultado da soma das combinações dois a dois destes três números. Por exemplo, variáveis A, B e C, mostrar A + B, A + C, B + C.
A <- 2
B <- 3
C <- 4
A + B## [1] 5A + C ## [1] 6B + C## [1] 7Exercício 2) Definir duas variáveis A e B e trocar seus valores. Ex: Entrada: A=6 e B=8 Saída: A=8 e B=6.
A <- 6
B <- 8
Aux <- A
A <- B
B <- Aux
print(A)## [1] 8print(B)## [1] 6Exercício 3) Converter uma temperatura de Fahrenheit para Centígrados. C = (F - 32) * ( 5 / 9 ).
F <- 180
C <- (F - 32) * ( 5 / 9 )
cat("A temperatura de", F, "°F equivale a", C, "°C.\n")## A temperatura de 180 °F equivale a 82.22222 °C.Exercício 4) Escrever um algoritmo que defina um número X e calcule:
X <- 10
a <- (X^3)-4
cat("X3 - 4=", a, "\n")## X3 - 4= 996b <- X %% 3
cat("X/3=", b, "\n")## X/3= 1c <- X * (X / 3) + 2
cat("X(x/3)+2=", c, "\n")## X(x/3)+2= 35.33333d <- sqrt(X^2)
cat("Raiz quadrada de X2=", d, "\n")## Raiz quadrada de X2= 10Exercício 5) Crie um vetor numérico com os números de 1 a 10 e armazene-o em uma variável chamada “numeros”. Em seguida, imprima o vetor.
numeros <- 1:10
print(numeros)## [1] 1 2 3 4 5 6 7 8 9 10Exercício 6) Crie um vetor de caracteres com os nomes dos dias da semana e armazene-o em uma variável chamada “dias”. Em seguida, imprima o vetor.
dias <- c("Segunda-feira", "Terça-feira", "Quarta-feira", "Quinta-feira", "Sexta-feira", "Sábado", "Domingo")
print(dias)## [1] "Segunda-feira" "Terça-feira" "Quarta-feira" "Quinta-feira"
## [5] "Sexta-feira" "Sábado" "Domingo"Exercício 7) Crie uma matriz 3x3 com os números de 1 a 9 e armazene-a em uma variável chamada “matriz”. Em seguida, imprima a matriz.
matriz <- matrix(1:9, nrow = 3, ncol = 3)
print(matriz)## [,1] [,2] [,3]
## [1,] 1 4 7
## [2,] 2 5 8
## [3,] 3 6 98)Crie um data-frame com as informações de 3 pessoas: nome (caracter), idade (numérico) e cidade natal (caracter). Armazene o data-frame em uma variável chamada “pessoas” e imprima-o.
pessoas <- data.frame(nome = c("Renato", "Bruno", "Carla"), idade = c(28, 34, 22), cidade_natal = c("São Benedito", "Rio de Janeiro", "Fortaleza"))
print(pessoas)## nome idade cidade_natal
## 1 Renato 28 São Benedito
## 2 Bruno 34 Rio de Janeiro
## 3 Carla 22 FortalezaExercício 9) Limpe as variáveis que estão no sistema e em seguida crie 3 variáveis, x, y e z e atribua valores numéricos para elas. Em seguida realize comparações entre elas (utilize TODOS os operadores de comparação (<. <. >=, <=, ==, !=).
rm(list = ls())
x <- 20
y <- 30
z <- 40
# Menor que (<)
menor <- x < y
# Maior que (>)
maior <- y > z
# Maior ou igual (>=)
maior_igual <- x >= z
# Menor ou igual (<=)
menor_igual <- y <= x
# Igualdade (==)
igual <- x == z
# Diferente (!=)
diferente <- x != y
print(menor)## [1] TRUEprint(maior)## [1] FALSEprint(maior_igual)## [1] FALSEprint(menor_igual)## [1] FALSEprint(igual)## [1] FALSEprint(diferente)## [1] TRUEExercício 10) Limpe as variáveis que estão no sistema e em seguida crie 3 variáveis, “rua”, “numero” e “bairro” e atribua valores (texto) para elas. Em seguida concatene essas variáveis em uma terceira chamada “endereco”.
rm(list = ls())
rua <- "Rua Miguel Fernandes"
numero <- "8"
bairro <- "Méier"
endereco <- paste(rua, numero, bairro)
print(endereco)## [1] "Rua Miguel Fernandes 8 Méier"Exercício 11) Elabore um algoritmo que:
a) Crie um vetor com uma sequência de 10 números. b) Faça um loop para
calcular a soma dos números do vetor. c) Utilize o comando “vetor <-
c(1:10)” para criar o vetor. d) Utilize o comando “for( i in 1:10) {
…comandos}” para realizar a soma. e) Referencie os valores do vetor com
o comando: “vetor[i]”, onde “i” é o índice referência (número) Ex.
vetor: 1,2,3,4,5,6,7,8,9,10 | Soma dos números = 55.
vetor <- c(1:10)
print(vetor)## [1] 1 2 3 4 5 6 7 8 9 10soma <- 0
for(i in 1:10){soma <- soma + vetor[i]}
print(soma)## [1] 55Exercício 12) A partir do exercício anterior, faça a média dos valores contidos no vetor.
media <- soma/i
print(media)## [1] 5.5Exercício Crie duas variáveis, x e y. Compare se x é maior que y. Se
for, imprima “x é maior que y”, se não for, imprima “y é maior que x”.
a) A sintaxe do comando de comparação é: if (x > y) {comandos…} else
{comandos}
b) O comando print(“texto ou variável”) imprime a resposta na tela.
x <- 10
y <- 20
if(x > y){
print("x é maior que y")
}else{
print("y é maior que x")
}## [1] "y é maior que x"Exercício Repita o exercício “7)” realizando os seguintes ajustes: a) Substitua o sinal de maior (“>”) pelo de menor ou igual (“<=”) e ajuste dos dizeres da resposta.
x <- 10
y <- 20
if(x <= y){
print("x é menor ou igual y")
}else{
print("y é menor ou igual x")
}## [1] "x é menor ou igual y"Exercício 15) A partir do exercício “5)”, faça a soma somente dos números pares. a) Utilize o comando “%%” para identificar o resto da divisão. Ex: “5%%2”, cinco dividido por dois terá como resto “1”. Ou seja, o resultado dessa operação será “1”. 2 b) Utilize o comando de decisão “if” para saber se o número é par ou ímpar.
numeros <- c(1:10)
soma_pares <- 0
for(i in 1:10){if(i%%2 == 0){soma_pares <- soma_pares + vetor[i]}}
cat("A soma dos números pares é", soma_pares)## A soma dos números pares é 30Exercício 16) Faça um algoritmo que calcule e imprima o fatorial de um número inteiro.
fatorial <- 1
for(i in 1:5){fatorial <- fatorial * i}
print(fatorial)## [1] 120Exercício 17) Crie uma matriz 4x4. a) Uma matriz no R comporta somente um tipo de dado (número, texto ou boleano). b) O comando para criar a matriz é “x <- matrix(data = 1, nrow = 4, ncol = 4, byrow = TRUE)”
matriz <- matrix(data=1, nrow=4, ncol=4, byrow=TRUE)
print(matriz)## [,1] [,2] [,3] [,4]
## [1,] 1 1 1 1
## [2,] 1 1 1 1
## [3,] 1 1 1 1
## [4,] 1 1 1 1Exercício 18) Agora, crie uma matriz com a sequência de 1 a 16.
matriz <- matrix(data=1:16, nrow=4, ncol=4, byrow=TRUE)
print(matriz)## [,1] [,2] [,3] [,4]
## [1,] 1 2 3 4
## [2,] 5 6 7 8
## [3,] 9 10 11 12
## [4,] 13 14 15 16Exercício 19) Transforme essa matriz em um data.frame a) Um data.frame é uma estrutura de dados similar a matriz que pode conter dados diferentes em suas variáveis. b) Lembre-se que também chamamos as colunas de variáveis e as linhas de registros. c) Uma variável (coluna) não pode conter dados diferentes. Ou todas as linhas dessa variável são números, ou todas são texto, ou ainda, boleanos. d) Utilize o comando “df <- as.data.frame(x)”
df <- as.data.frame(matriz)
print(df)## V1 V2 V3 V4
## 1 1 2 3 4
## 2 5 6 7 8
## 3 9 10 11 12
## 4 13 14 15 16Exercício 20) Utilizando os comandos de repetição e decisão (se for necessário), calcule: a) a média de uma coluna da matriz do exercício “12)”. b) A média de todas as colunas da matriz do exercício “12)”. c) A média de todas as linhas da matriz do exercício “12)”. d) A média dos números pares de todas as colunas da matriz do exercício “12)”. e) A média dos números ímpares de todas as linhas da matriz do exercício “12)”. f) A soma da diagonal principal da matriz. g) A soma da diagonal secundária da matriz (desafio).
Exercício 21) Repita o exercício “14)” com os dados do data.frame do exercício “13)”.
Exercício 22) Crie um loop for que imprime os números de 1 a 10.
for(i in 1:10){print (i)}## [1] 1
## [1] 2
## [1] 3
## [1] 4
## [1] 5
## [1] 6
## [1] 7
## [1] 8
## [1] 9
## [1] 10Exercício 23) Crie um vetor numérico com os números de 1 a 100. Em seguida, crie um novo vetor que contenha apenas os números pares do vetor original.
vetor <- c(1:100)
print(vetor)## [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
## [19] 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
## [37] 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54
## [55] 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72
## [73] 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90
## [91] 91 92 93 94 95 96 97 98 99 100pares <- c()
for(i in 1:100){if(i%%2 == 0) pares <- c(pares, vetor[i])}
print(pares)## [1] 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38
## [20] 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76
## [39] 78 80 82 84 86 88 90 92 94 96 98 100