Alguém pensou numa solução diferente?

Alguns dos caros colegas teria uma solução diferente da que eu encontrei? Segue o passo a passo:

tri_1 <- c(25, 30, 22, 28, 18)
tri_2 <- c(20, 15, 22, 28, 32)
tri_3 <- c(30, 15, 22, 28, 32)
tri_4 <- c(30, 35, 10, 15, 8)
tri_5 <- c(12, 28, 25, 20, 22)

1º Passo é combinar os vetores:

tri_combinado <- c(tri_1, tri_2, tri_3, tri_4, tri_5)

2º Passo é criar uma matrix a partir dos vetores combinados, utilizando a função matrix()

matrix_tri <- matrix(tri_combinado, nrow = 6, ncol = 6, byrow = TRUE)

Insira aqui a descrição dessa imagem para ajudar na acessibilidade

3º Passo é a criação dos nomes das linhas por meio da função rownames()

rownames(matrix_tri) <- c('1º Trimestre', '2º Trimestre', '3º Trimestre', '4º Trimestre', '5º Trimestre', '6º Trimestre')

4º Passo é a criação dos nomes das colunas por meio da função colnames()

colnames(matrix_tri) <- c('cidade A', 'cidade B', 'cidade C', 'cidade E', 'cidade F', 'cidade G')

5º Passo é apresentar a matrix_tri utilizando a função print()

print(matrix_tri)

Insira aqui a descrição dessa imagem para ajudar na acessibilidade

# Vetores representando cidades e trimestres cidades <- c("São Paulo", "Rio de Janeiro", "Belo Horizonte", "Salvador", "Porto Alegre") trimestres <- c("1º Trimestre", "2º Trimestre", "3º Trimestre", "4º Trimestre") # Combinar os vetores trimestres_comb <- c(tri_1, tri_2, tri_3, tri_4) # Criar a matriz combinando os vetores dados_temperatura <- matrix(trimestres_comb, nrow = 4, # ou nrow = length(trimestres) ncol = 5, # ou ncol = length(cidades) byrow = TRUE, ) # Nomeando a matriz rownames(dados_temperatura) <- trimestres colnames(dados_temperatura) <- cidades # Exibir a matriz dados_temperatura