Descargue los ficheros de R que hay en el siguiente sitio y cópielos al directorio de trabajo en RStudio.
r-ueda
S.R: Fichero para iniciar
Es.R: Fichero de ejecuciones
F.R: Fichero de funciones
*.txt: Ficheros de datos
Utilizamos las siguientes funciones cuando sean necesarias.
Ca() #Eliminar todo y empezar de nuevo
rm(list=ls()) #Eliminar todo
dev.off() #Cerrar device (volver al inicio)
source(‘S.R’); Start() #Cargar ‘S.R’ y empezar
par(mar=c(2,2,2,2)) #Margen (abajo,izquierda,arriba, derecha,
load(“.RData”) #Cargar el espacio de trabajo
save.image(“.RData”) #Guardar el espacio de trabajo
getwd() #Get working directory #Averiguar el directorio de trabajo
setwd(dir) #Set working directory #Establecer el directorio de trabajo
Plegar todo: (Win) Alt+O (Mac) Ctrl+Command+O
Desplegar todo: (Win) Alt+Shift+O (Mac) Ctrl+Command+Shift+O
Utilizamos las siguientes funciones para tratar las letras españolas y japonesas.
Sys.setlocale(category = ‘LC_CTYPE’, locale = ‘spanish’)#Letras españolas
par(family = “HiraKakuProN-W3”) #Letras japonesas (MAC
Instalamos los siguientes paquetes. (Solo una vez)
install.packages(“RColorBrewer”)
install.packages(“data.table”)
install.packages(“epitools”) #epitools
install.packages(“factoextra”) #PCA
install.packages(“ggmosaic”)
install.packages(“ggnewscale”)#ggnewscale (scale_fill)
install.packages(“ggrepel”) #
install.packages(“magrittr”)
install.packages(“maptools”) #pointLabel
install.packages(“mosaid”) #ggnewscale
install.packages(“patchwork”) #p1 + p2 output
install.packages(“textplot”) ##??
install.packages(“vcd”) #mosaic
install.packages(“wesanderson”)
install.packages(‘colorspace’) #slanter::sheatmap
install.packages(‘dendextend’) #slanter::sheatmap
install.packages(‘ggpubr’) #ggdensity etc.
install.packages(‘ggtext’) #
install.packages(‘gplots’) #
install.packages(‘lattice’)
install.packages(‘pheatmap’)
install.packages(‘showtext’) #
install.packages(‘slanter’) #slanter::sheatmap
install.packages(‘stringr’) #tratamiento de letras
install.packages(‘tidyverse’) #ggplot2
install.packages(‘vegan’) #
Utilizamos los siguientes librarys.
library(‘colorspace’)
library(data.table); library(dendextend); library(dplyr)
library(epitools)
library(factoextra) #PCA
library(ggmosaic); library(ggnewscale); library(ggplot2); library(gplots)
library(ggrepel); library(grid); library(ggpubr); library(ggtext)
library(showtext)
library(lattice); library(latticeExtra)
library(MASS); library(magrittr); library(maptools); ibrary(mosaic)
library(patchwork); library(pheatmap)
library(RColorBrewer); library(reshape2); library(rlang)
library(scales); library(showtext); library(stringr); library(slanter)
library(textplot)
library(tidyr); library(tidyverse); library(tm)
library(viridis); library(vcd); library(vegan)
library(wordcloud)
—–
(Hiroto Ueda, Universidad de Tokio, 2022)