Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
58 changes: 33 additions & 25 deletions codigo/01-intro.R
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ knitr::include_graphics("figuras/r_padrao.png")
#'
#' Ao abrirem o R ou o RStudio você terão basicamente duas janelas principais:
#'
#' * **Console** - corresponde`a interface que interpreta o código da linguagem. Os códigos digitados aqui serão interpretados pelo R (Texto destacado em **verde** nas figuras \@ref(fig:pad-r), \@ref(fig:studio-r));
#' * **Console** - corresponde à interface que interpreta o código da linguagem. Os códigos digitados aqui serão interpretados pelo R (Texto destacado em **verde** nas figuras \@ref(fig:pad-r), \@ref(fig:studio-r));
#'
#' * **Script** - digitar um código curto no console é simples, mas quando o código é longo, é importante guardá-lo em algum lugar para executá-lo em qualquer momento. Para isso utilizamos scripts, que são arquivos de textos simples que podem ser salvo (extensão `.R`) numa pasta no seu computador e reutilizado (Texto destacado em **amarelo** nas figuras \@ref(fig:pad-r), \@ref(fig:studio-r)). Como um arquivo `.R` é um texto simples, ele é editável por qualquer editor de texto, como o Bloco de Notas ou [Notepad++](https://notepad-plus-plus.org/) para usuários Windows, [TextWrangler](https://www.barebones.com/products/textwrangler/) ou [BBEdit](https://www.barebones.com/products/textwrangler/) para usuários macOS, ou [gedit](https://help.gnome.org/users/gedit/stable/index.html.pt_BR) para usuários Linux. O editor de scripts do RStudio é excelente.
#'
Expand Down Expand Up @@ -126,7 +126,7 @@ ls(sorted = FALSE) # ele mostra os objetos na ordem que foram criados
#' Se você necessitar deste pacote, por exemplo, basta executar o seguinte comando no console do R:
#'
## ----eval = FALSE, echo = TRUE------------------------------------------------
## install.packages("ape")
# install.packages("ape")

#'
#' Para trabalhar com pacotes você primeiro precisa definir um repositório, ou seja, um servidor, de vários disponíveis (espelhos do repositório oficial), de onde o R buscará o pacote desejado.
Expand All @@ -136,9 +136,9 @@ ls(sorted = FALSE) # ele mostra os objetos na ordem que foram criados
#' Por exemplo, ao invés de usarmos o menu do R para definir um repositório e instalar um pacote, vamos executar estas ações por meio de um script:
#'
## ----eval = FALSE, echo = TRUE------------------------------------------------
## # isso pode não funcionar se estiver no INPA por causa do Proxy.
## chooseCRANmirror() # seleciona repositório
## install.packages("ape", dependencies = TRUE) # instala o pacote Ape
# # isso pode não funcionar se estiver no INPA por causa do Proxy.
# chooseCRANmirror() # seleciona repositório
# install.packages("ape", dependencies = TRUE) # instala o pacote Ape

#'
#' ## Ajuda no R {#help}
Expand Down Expand Up @@ -191,14 +191,14 @@ getwd() # o nome desta função é abreviação de "get working directory" ou se
#' Ou você pode usar uma função:
#'
## ----eval = FALSE, echo = TRUE------------------------------------------------
## ?setwd # veja o help da função que iremos utilizar
## minhapasta <- "/Users/BetoVicentini/Desktop/bot89-2016"
## # se estiver usando windows:
## # minhapasta = "c:/Users/BetoVicentini/Documents/bot89-2016"
## # minhapasta = "c:\\/Users\\/BetoVicentini\\/Documents\\/bot89-2016" #talvez precise usar barras invertidas
##
## setwd(dir = minhapasta) # usa a funçao "set working directory" para especificar o diretório (pasta) de trabalho
## # note que eu defini dir primeiramente como o objeto "minhapasta" usei esse objeto para especificar o objeto "dir", que é o único argumento da função setwd()
# ?setwd # veja o help da função que iremos utilizar
# minhapasta <- "/Users/BetoVicentini/Desktop/bot89-2016"
# # se estiver usando windows:
# # minhapasta = "c:/Users/BetoVicentini/Documents/bot89-2016"
# # minhapasta = "c:\\/Users\\/BetoVicentini\\/Documents\\/bot89-2016" #talvez precise usar barras invertidas
#
# setwd(dir = minhapasta) # usa a funçao "set working directory" para especificar o diretório (pasta) de trabalho
# # note que eu defini dir primeiramente como o objeto "minhapasta" usei esse objeto para especificar o objeto "dir", que é o único argumento da função setwd()

#'
#' Objetos criados no R por você podem ser salvos como um arquivo no seu computador.
Expand Down Expand Up @@ -312,7 +312,7 @@ ls() # os objetos foram criados como especificado no script
#' Você verá que o sinal de `>` voltará a aparecer no console.
#'
## ----eval = FALSE-------------------------------------------------------------
## erro <- c(1, 2, 3
# erro <- c(1, 2, 3

#'
#' Agora, execute o comando abaixo.
Expand All @@ -329,7 +329,9 @@ erro <- c(1, 2, 3)
#' Tentem executar o código abaixo:
#'
## ----error = TRUE-------------------------------------------------------------
try({
numeros <- c(1, 5, 6 7, 8)
})

#'
#' O R dará o aviso `Error: unexpected numeric constant in "numeros <- c(1,5,6 7"` e encerrá a operação.
Expand Down Expand Up @@ -370,7 +372,9 @@ obj2 <- "18"
#' Isso não vai funcionar porque `obj2` não é um número.
#'
## ----error = TRUE-------------------------------------------------------------
try({
obj2 + 1
})

#'
#' Caso você insista em rodar, receberá a seguinte mensagem: `Error in obj2 + 1 : non-numeric argument to binary operator`.
Expand All @@ -380,7 +384,9 @@ obj2 + 1
#' Nomes de objetos não podem ter espaço em branco e aspas são ignoradas:
#'
## ----error = TRUE-------------------------------------------------------------
try({
obj 1 = "meutexto" #nao vai funcionar
})

#'
#'
Expand All @@ -394,7 +400,9 @@ obj1
#'
#'
## ----error = TRUE-------------------------------------------------------------
try({
obj"1" = "meu texto" #nao vai funcionar
})

#'
#'
Expand Down Expand Up @@ -436,7 +444,7 @@ str(iris) #veja a estrutura
#' Agora, vamos obter um sumário estatístico de `iris`:
#'
## ----eval=FALSE, echo=TRUE----------------------------------------------------
## summary(iris) #veja o que é iris
# summary(iris) #veja o que é iris

#'
## ----eval=TRUE, echo=FALSE----------------------------------------------------
Expand Down Expand Up @@ -600,16 +608,16 @@ o1 * o2^(o3 - 1) # =32
#' Veja o `?` para qualquer uma das funções abaixo e siga os links relacionados para ver todas as possibilidades dessas funções genéricas de uso genérico.
#'
## ----echo = TRUE, eval = FALSE------------------------------------------------
## ?srqt
## ?abs
## ?log
## ?log10
## ?sin
## ?cos
## ?asin
## ?ceiling
## ?floor
## ?round
# ?srqt
# ?abs
# ?log
# ?log10
# ?sin
# ?cos
# ?asin
# ?ceiling
# ?floor
# ?round

#'
#' Veremos adiante que essas funções e operações matemáticas são aplicáveis à vetores.
Expand Down
16 changes: 8 additions & 8 deletions codigo/02-vetores.R
Original file line number Diff line number Diff line change
Expand Up @@ -47,7 +47,7 @@ v3 == v4
#' Tente executar o comando abaixo para ver o que acontece quando utilizamos esses valores em letras minúsculas:
#'
## ----echo = TRUE, eval = FALSE------------------------------------------------
## v5 <- c(true, true, false, false)
# v5 <- c(true, true, false, false)

#'
#' O R retorna a mensagem de erro `Error: object 'true' not found` pois ele procura pelo primeiro objeto de nosso vetor ` c(true, true, false, false)` na área de trabalho e, ao não encontrar, ele retorna esta mensagem de erro, justamente por não compreender `true` como um vetor lógico, e sim como um objeto!
Expand Down Expand Up @@ -421,8 +421,8 @@ data2 <- "17/04/2016"
#'
#'
## ----echo = TRUE, eval = FALSE------------------------------------------------
## # eu nao posso simplesmente subtrair esses valores
## data2 - data1
# # eu nao posso simplesmente subtrair esses valores
# data2 - data1

#'
#' O R retorna uma mensagem de erro (`Error in data2 - data1 : non-numeric argument to binary operator`) porque esses objetos são de classe texto, e operações matemáticas só são permitidas com números ou datas.
Expand All @@ -436,9 +436,9 @@ class(data2)
#' Porém, se convertermos esses objetos para a classe `Date`, então poderemos fazer operações matemáticas com eles:
#'
## ----echo = TRUE, eval = FALSE------------------------------------------------
## # mas o R tem um classe para datas
## # entao fazemos a conversao
## ?as.Date # veja o help dessa função
# # mas o R tem um classe para datas
# # entao fazemos a conversao
# ?as.Date # veja o help dessa função

#'
#'
Expand Down Expand Up @@ -738,8 +738,8 @@ v2
#'
#'
## ----echo = TRUE, eval = FALSE------------------------------------------------
## # isso também pode ser feito com na.omit()
## ?na.omit # veja o help dessa função
# # isso também pode ser feito com na.omit()
# ?na.omit # veja o help dessa função

#'
#'
Expand Down
Loading