Outras Funcionalidades dos Vetores

Inclusão e remoção:

uf <- c("TO", "MG", "AM", "PE")
uf

## [1] "TO" "MG" "AM" "PE"

Incluindo o PR no final do vetor:

uf <- append(uf, "PR")
uf

## [1] "TO" "MG" "AM" "PE" "PR"

Substituindo o elemento da posição 2:

uf[2] <- "CE"
uf

## [1] "TO" "CE" "AM" "PE" "PR"

Removendo o elemento da posição 2:

uf <- uf[-4]
uf

## [1] "TO" "CE" "AM" "PR"

Quantidade de elementos

length(uf)

## [1] 4

Ordem dos elementos

Organizando os elementos em ordem crescente:

sort(uf)

## [1] "AM" "CE" "PR" "TO"

Organizando os elementos em ordem decrescente:

sort(uf, decreasing = TRUE)

## [1] "TO" "PR" "CE" "AM"

Exibindo os elementos em ordem reversa:

rev(uf)

## [1] "PR" "AM" "CE" "TO"

Obtendo o terceiro UF (considerando o alfabeto):

i <- order(uf)
i

## [1] 3 2 4 1

uf[i[3]]

## [1] "PR"

Valores únicos

x <- c("a", "b", "a", "c", "b", "c", "b", "a", "c", "b")
unique(x)

## [1] "a" "b" "c"

Valores NA (missing)

Testando se os valores são NA:

x <- c(1, 2, NA, 3, 4, 5, NA)
is.na(x)

## [1] FALSE FALSE  TRUE FALSE FALSE FALSE  TRUE

Verificando se há ao menos um valor NA:

any(is.na(x))

## [1] TRUE

Repetindo valores

Repetindo a letra “a” 5 vezes:

rep("a", 5)

## [1] "a" "a" "a" "a" "a"

Criando um vetor com 5 elementos “a” e 5 elementos “b”:

v <- c(rep("a", 5), rep("b", 5))
v

##  [1] "a" "a" "a" "a" "a" "b" "b" "b" "b" "b"

Embaralhando os elementos:

v <- sample(v)
v

##  [1] "b" "b" "b" "b" "a" "a" "a" "b" "a" "a"

Nomes

MGLU3 <- c(59.7, 60.5, 62.9, 63.7, 62.2)
MGLU3

## [1] 59.7 60.5 62.9 63.7 62.2

names(MGLU3) <- c("SEG", "TER", "QUA", "QUI", "SEX")
MGLU3

##  SEG  TER  QUA  QUI  SEX 
## 59.7 60.5 62.9 63.7 62.2

MGLU3["QUA"]

##  QUA 
## 62.9