Skip to content

Commit

Permalink
shortcuts
Browse files Browse the repository at this point in the history
  • Loading branch information
temospena committed Feb 10, 2020
1 parent a747142 commit 380d58c
Show file tree
Hide file tree
Showing 4 changed files with 63 additions and 13 deletions.
Binary file modified .RData
Binary file not shown.
14 changes: 14 additions & 0 deletions COMPILACAO.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -193,13 +193,24 @@ require(devtools)
install_version("stplanr", version = "0.3.1", repos = "http://cran.us.r-project.org")
```

##Shortcuts
* Correr linha/seleccão - `crtl`+`enter`
* Setinha `<-` - `crtl`+`alt`+`-`
* Pipes `%>%` - `crtl`+`shift`+`m`
* Inserir chunks - `crtl`+`alt`+`i`
* Knit - `crtl`+`shift`+`k`
* Restart R - `crtl`+`shift`+`F10`
* Quit R - `crtl`+`q`

> _Pode não funcionar em Mac_
##Definição do ambiente de trabalho
Isto permite que não se tenha de estar sempre a escrever o caminho completo do ficheiro a abrir ou a guardar (outputs).
Definir no início da sessão.
```{r set workspace, eval=F}
setwd("D:/GIS/Rosix")
```
ou `crtl`+`shift`+`h`

##Importar tabelas
```{r import tables, eval=F}
Expand Down Expand Up @@ -402,6 +413,9 @@ ALOJAMENTO<-separate(ALOJAMENTO, ID_aloj, into=c("IDa", "ID1"), sep="F1_", remov
TABELA$IDADE<-as.numeric(TABELA$IDADE)
TABELA$IDADE<-as.character(TABELA$IDADE)
#Bonverter várias variáveis ao mesmo tempo
BioGeme[,c(7,9:13,24:28,33:35,38:40)] <- as.integer(unlist(BioGeme[,c(7,9:13,24:28,33:35,38:40)])) #binárias para inteiros - útil para biogeme
#Converter campo de data para sistema POSIX, extrair ano, mês, etc para colunas separadas
Taxis$DataSTi <-as.POSIXlt(Taxis$DataHora, format="%Y/%m/%d %H:%M:%S")
Taxis$Ano <- format(as.POSIXlt(Taxis$DataHora, format="%Y/%m/%d %H:%M:%S"),"%Y")
Expand Down
48 changes: 35 additions & 13 deletions COMPILACAO.html
Original file line number Diff line number Diff line change
Expand Up @@ -353,14 +353,33 @@ <h2><span class="header-section-number">1.1</span> Importar packages</h2>
require(devtools)
install_version(&quot;stplanr&quot;, version = &quot;0.3.1&quot;, repos = &quot;http://cran.us.r-project.org&quot;)</code></pre>
</div>
<div id="shortcuts" class="section level2">
<h2><span class="header-section-number">1.2</span> Shortcuts</h2>
<ul>
<li>Correr linha/seleccão - <code>crtl</code>+<code>enter</code></li>
<li>Setinha <code>&lt;-</code> - <code>crtl</code>+<code>alt</code>+<code>-</code><br />
</li>
<li>Pipes <code>%&gt;%</code> - <code>crtl</code>+<code>shift</code>+<code>m</code><br />
</li>
<li>Inserir chunks - <code>crtl</code>+<code>alt</code>+<code>i</code></li>
<li>Knit - <code>crtl</code>+<code>shift</code>+<code>k</code></li>
<li>Restart R - <code>crtl</code>+<code>shift</code>+<code>F10</code><br />
</li>
<li>Quit R - <code>crtl</code>+<code>q</code></li>
</ul>
<blockquote>
<p><em>Pode não funcionar em Mac</em></p>
</blockquote>
</div>
<div id="definição-do-ambiente-de-trabalho" class="section level2">
<h2><span class="header-section-number">1.2</span> Definição do ambiente de trabalho</h2>
<h2><span class="header-section-number">1.3</span> Definição do ambiente de trabalho</h2>
<p>Isto permite que não se tenha de estar sempre a escrever o caminho completo do ficheiro a abrir ou a guardar (outputs).<br />
Definir no início da sessão.</p>
<pre class="r"><code>setwd(&quot;D:/GIS/Rosix&quot;)</code></pre>
<p>ou <code>crtl</code>+<code>shift</code>+<code>h</code></p>
</div>
<div id="importar-tabelas" class="section level2">
<h2><span class="header-section-number">1.3</span> Importar tabelas</h2>
<h2><span class="header-section-number">1.4</span> Importar tabelas</h2>
<pre class="r"><code>#importar tabela em formato nativo R
readRDS(TABELA, &quot;D:/R/Tabela.Rds&quot;)

Expand Down Expand Up @@ -393,7 +412,7 @@ <h2><span class="header-section-number">1.3</span> Importar tabelas</h2>
rm(files)</code></pre>
</div>
<div id="chamar-tabelas" class="section level2">
<h2><span class="header-section-number">1.4</span> Chamar tabelas</h2>
<h2><span class="header-section-number">1.5</span> Chamar tabelas</h2>
<p>Uma tabela tem sempre linhas e colunas.</p>
<ul>
<li>Para chamar a tabela, deve-se referir ao nome dela <code>TABELA</code><br />
Expand Down Expand Up @@ -437,7 +456,7 @@ <h2><span class="header-section-number">1.4</span> Chamar tabelas</h2>
</blockquote>
</div>
<div id="ler-e-alterar-colunas" class="section level2">
<h2><span class="header-section-number">1.5</span> Ler e alterar colunas</h2>
<h2><span class="header-section-number">1.6</span> Ler e alterar colunas</h2>
<pre class="r"><code>#listar todas as colunas da tabela
colnames(TABELA)

Expand Down Expand Up @@ -536,7 +555,7 @@ <h2><span class="header-section-number">1.5</span> Ler e alterar colunas</h2>
attach(TABELA)
detach(TABELA) #reverter</code></pre>
<div id="concatenate-e-seprate" class="section level3">
<h3><span class="header-section-number">1.5.1</span> Concatenate e seprate</h3>
<h3><span class="header-section-number">1.6.1</span> Concatenate e seprate</h3>
<pre class="r"><code>#juntar variáveis numa só
TABELA$coordenadas&lt;-paste(&quot;POINT(&quot;,TABELA$Longitude,&quot; &quot;,TABELA$Latitude,&quot;)&quot;)
TABELA$gorila&lt;-paste(&quot;go&quot;,&quot;ri&quot;,&quot;la&quot;, sep = &quot;_&quot;) #go_ri_la
Expand All @@ -548,10 +567,13 @@ <h3><span class="header-section-number">1.5.1</span> Concatenate e seprate</h3>
#separa a variável ID_aloj em duas (dar os nomes), segundo um padrão, remover a variável original por default</code></pre>
</div>
<div id="mudar-o-tipo-de-variável" class="section level3">
<h3><span class="header-section-number">1.5.2</span> Mudar o tipo de variável</h3>
<h3><span class="header-section-number">1.6.2</span> Mudar o tipo de variável</h3>
<pre class="r"><code>TABELA$IDADE&lt;-as.numeric(TABELA$IDADE)
TABELA$IDADE&lt;-as.character(TABELA$IDADE)

#Bonverter várias variáveis ao mesmo tempo
BioGeme[,c(7,9:13,24:28,33:35,38:40)] &lt;- as.integer(unlist(BioGeme[,c(7,9:13,24:28,33:35,38:40)])) #binárias para inteiros - útil para biogeme

#Converter campo de data para sistema POSIX, extrair ano, mês, etc para colunas separadas
Taxis$DataSTi &lt;-as.POSIXlt(Taxis$DataHora, format=&quot;%Y/%m/%d %H:%M:%S&quot;)
Taxis$Ano &lt;- format(as.POSIXlt(Taxis$DataHora, format=&quot;%Y/%m/%d %H:%M:%S&quot;),&quot;%Y&quot;)
Expand All @@ -566,7 +588,7 @@ <h3><span class="header-section-number">1.5.2</span> Mudar o tipo de variável</
Taxis$DataHora2016&lt;-as.POSIXct(Taxis$DataHora2016, format=&quot;%Y-%m-%d %H:%M:%S&quot;)</code></pre>
</div>
<div id="criar-tabela-com-data-sequencial-por-dia-ou-hora" class="section level3">
<h3><span class="header-section-number">1.5.3</span> Criar tabela com data sequencial, por dia ou hora</h3>
<h3><span class="header-section-number">1.6.3</span> Criar tabela com data sequencial, por dia ou hora</h3>
<pre class="r"><code>#Cria uma tabela com todas as horas do ano de 2016
Horas2016&lt;-as.data.frame(seq.POSIXt(ISOdate(2016,1,1,0), ISOdate(2016,12,31,23), by=&quot;hour&quot;)) #é aqui que podes trocar por dia ou minuto</code></pre>
<blockquote>
Expand All @@ -575,7 +597,7 @@ <h3><span class="header-section-number">1.5.3</span> Criar tabela com data seque
</div>
</div>
<div id="group-by-summarize-e-melt" class="section level2">
<h2><span class="header-section-number">1.6</span> Group by, summarize e melt</h2>
<h2><span class="header-section-number">1.7</span> Group by, summarize e melt</h2>
<p>Calcula as médias e freq, de uma variável</p>
<pre class="r"><code>#média
groupmean&lt;-group_by(MCBARRIERSERA,ERA)
Expand All @@ -591,14 +613,14 @@ <h2><span class="header-section-number">1.6</span> Group by, summarize e melt</h
ODsViagens&lt;-group_by(VIAGENSredux, Tipo, ID0, ID1)
ODsViagens&lt;-summarise(ODsViagens,sum(DistanciaM), n())</code></pre>
<div id="melt---dissolve-as-colunas-em-várias-linhas-repetidas" class="section level3">
<h3><span class="header-section-number">1.6.1</span> Melt - dissolve as colunas em várias linhas repetidas</h3>
<h3><span class="header-section-number">1.7.1</span> Melt - dissolve as colunas em várias linhas repetidas</h3>
<pre class="r"><code>MCBARRIERSERAmelt &lt;- melt(MCBARRIERSERA, id.vars=c(&quot;names&quot;,&quot;MCBARRIERSERA.MEAN&quot;, &quot;MCBARRIERSERA.FREQ&quot;))</code></pre>
</div>
</div>
<div id="variáveis-categóricas" class="section level2">
<h2><span class="header-section-number">1.7</span> Variáveis categóricas</h2>
<h2><span class="header-section-number">1.8</span> Variáveis categóricas</h2>
<div id="factors-e-levels" class="section level3">
<h3><span class="header-section-number">1.7.1</span> Factors e levels</h3>
<h3><span class="header-section-number">1.8.1</span> Factors e levels</h3>
<pre class="r"><code>#Criar factors e levels
TODOS$Gender&lt;-factor(TODOS$Gender)
TODOS$Gender&lt;-factor(TODOS$Gender, levels = c(&quot;Male&quot;, &quot;Female&quot;, &quot;Other&quot;)) #definir logo a ordem
Expand Down Expand Up @@ -630,7 +652,7 @@ <h3><span class="header-section-number">1.7.1</span> Factors e levels</h3>
</div>
</div>
<div id="operações-nas-tabelas-ou-matrizes" class="section level2">
<h2><span class="header-section-number">1.8</span> Operações nas tabelas ou matrizes</h2>
<h2><span class="header-section-number">1.9</span> Operações nas tabelas ou matrizes</h2>
<pre class="r"><code>#Somar colunas
CTRIGGERS$SomaPontos &lt;- rowSums(CTRIGGERS[,c(146:193,196)])

Expand Down Expand Up @@ -667,7 +689,7 @@ <h2><span class="header-section-number">1.8</span> Operações nas tabelas ou ma
MCTRIGGERS &lt;- CTRIGGERS[,c(146:193,196)]/CTRIGGERS$SomaPontos</code></pre>
</div>
<div id="gravar-outputs" class="section level2">
<h2><span class="header-section-number">1.9</span> Gravar outputs</h2>
<h2><span class="header-section-number">1.10</span> Gravar outputs</h2>
<pre class="r"><code>#gravar tabela em ficheiro nativo R
saveRDS(TABELA, &quot;Tabela.Rds&quot;)

Expand Down
14 changes: 14 additions & 0 deletions COMPILACAO.md
Original file line number Diff line number Diff line change
Expand Up @@ -124,6 +124,16 @@ require(devtools)
install_version("stplanr", version = "0.3.1", repos = "http://cran.us.r-project.org")
```

##Shortcuts
* Correr linha/seleccão - `crtl`+`enter`
* Setinha `<-` - `crtl`+`alt`+`-`
* Pipes `%>%` - `crtl`+`shift`+`m`
* Inserir chunks - `crtl`+`alt`+`i`
* Knit - `crtl`+`shift`+`k`
* Restart R - `crtl`+`shift`+`F10`
* Quit R - `crtl`+`q`

> _Pode não funcionar em Mac_
##Definição do ambiente de trabalho
Isto permite que não se tenha de estar sempre a escrever o caminho completo do ficheiro a abrir ou a guardar (outputs).
Expand All @@ -132,6 +142,7 @@ Definir no início da sessão.
```r
setwd("D:/GIS/Rosix")
```
ou `crtl`+`shift`+`h`

##Importar tabelas

Expand Down Expand Up @@ -337,6 +348,9 @@ ALOJAMENTO<-separate(ALOJAMENTO, ID_aloj, into=c("IDa", "ID1"), sep="F1_", remov
TABELA$IDADE<-as.numeric(TABELA$IDADE)
TABELA$IDADE<-as.character(TABELA$IDADE)

#Bonverter várias variáveis ao mesmo tempo
BioGeme[,c(7,9:13,24:28,33:35,38:40)] <- as.integer(unlist(BioGeme[,c(7,9:13,24:28,33:35,38:40)])) #binárias para inteiros - útil para biogeme

#Converter campo de data para sistema POSIX, extrair ano, mês, etc para colunas separadas
Taxis$DataSTi <-as.POSIXlt(Taxis$DataHora, format="%Y/%m/%d %H:%M:%S")
Taxis$Ano <- format(as.POSIXlt(Taxis$DataHora, format="%Y/%m/%d %H:%M:%S"),"%Y")
Expand Down

0 comments on commit 380d58c

Please sign in to comment.