Etiquetas

555 74HC04 74HC14 74HC165 74LS04 acentos ADC10 Amstrad archivo arduino aristóteles armbian array ass at backup base64 bash Basho bc beethoven Biblia blog bucle c c++ c++11 c++17 C005 cadena Carmina Burana casting CD4017 CD4040 Cine clases Colores connect Consolación a Helvia Consolación a Marcia Consolación a Polibio constante corsair CPC Cristal 32Khz css cursor mouse cut daemon date dead keys Debian directorio disco duro DS32kHz electricidad Electrónica ensamblador entryList epicureismo Estadística estoicismo felicidad ffmpeg filePath filosofia Filosofía firefox flac for fstab funcion Gargantúa gastronomía gilgamesh Ginott gmp gpt grep gtts Hobbes hotkeys html imagemagick inline Javascript kde kernel modulos latex ldr lib-notify Linux Literatura ludoteca macro mapa de bits Matroska mega Microsoft Word Milan Kundera mkvextract mkvinfo mount mp3 mplayer MSP430 msp430F5529 MSP432 Multimedia Musica oop orange_pi pato PIR PL9823 Platón poesía POO en C++ pulseaudio puntero PWM pygame pyqt python QAction qApp QApplication QByteArray QDialog Qdir QFile QFileDialog QImage qlabel QList QListWidget QMessagebox QMouseEvent qpainter QPalette QPixmap QProcess QRegularExpression QRegularExpressionMatchIterator QString QStringList Qt qt5 QToolbar quijote QVector qwidget R Rabelais ratón relé Resonador cerámico samba San Agustín screen Séneca signal slot smart smartctl sox srt static const stdarg.h subtítulos Symbian tar teléfonos móviles temperatura temperatura cpu Temporizador tesseract Timer timestamp Trigonometría tts tutorial uid unicode user USI va_arg va_end va_list va_start velocidad ventilador Voltaire wallpaper xboxdrv xinput xrandr Z80 zip

miércoles, septiembre 12, 2012

Apuntes de R

Librerías
Instalar librerías:
install.packages("psych")

Cargar librerías:
library(psych)

Ver las librerías cargadas:
search()


Sistema de archivos:
getwd()            #Muestra el directorio actual
setwd("/xxx/xxx")  #Cambia el directorio actual
list.files()       #Muestra contenido del directorio actual
source ("file.R", echo=T) #Ejecuta un script


Datos:
#c() is a function that combines its arguments into a list
data = c(3,3,4,3,3,2)


#Read data into a dataframe called "ratings"
ratings <- read.table("stats.txt", header=T)


#Mostrar las variables en el entorno
ls()


#Explore the contents of the dataframe
class (ratings)     # Returns "data.frame"
names (ratings)     # Returns the names of the columns
head(ratings)       # Muestra 6 primeras filas
tail(ratings)       # Muestra ultimas 5 filas



#Crear una nueva tabla con la condición de que la columna 'cond' contenga el valor "des".
#La nueva tabla no incluye la columna 'cond'
des_group <-subset(data, data$cond=="des", select= -cond)


#Crear una nueva tabla con la condición de que la columna 'cond' No contenga el valor "des".
#La nueva tabla no incluye la columna 'cond'
aer_group <-subset(data, data$cond!="des", select= -cond)


#Crear correlación con las columnas 2,4 y 5:
cor (data[c(2,4,5]))


Histogramas
Ejemplo 1
#Plot histogram
hist (ratings$RedTruck)


Ejemplo 2
#Dibujar histograma de los datos en que la columna 'cond' contiene el valor 'des'.
#Incluye un título con dos lineas de texto.


hist(data$pre.wm.v[data$cond=="des"],
     main="Designed sports training\nPre WM verbal")


Ejemplo 3


hist(fakedata,
  xlab="etiqueta de X",
  ylab="etiqueta de Y",
  main="Titulo")




Layout
Ejemplo 1
# Plot four histograms in one page
layout(matrix(c(1,2,3,4),2,2,byrow=TRUE))
hist(ratings$WoopWoop,xlab="Rating")
hist(ratings$RedTruck,xlab="Rating")
hist(ratings$HobNob,xlab="Rating")
hist(ratings$FourPlay,xlab="Rating")


Ejemplo 2
#layout(matrix(c(1,2,3,4,5,6,7,8),4,2,byrow=TRUE)) # matriz de 2 columnas, 4 filas
layout(matrix(c(1,2,3,4,5,6,7,8),2,4,byrow=TRUE)) # matriz de 4 columnas, 2 filas


O también:
layout(matrix(c(1,2,3,4), nrow = 2, ncol = 2,byrow=TRUE))


Estadísticas
Ejemplo 1
# Get descript statistics
describe (ratings)

Ejemplo 2a
des_group <-subset(data, data$cond=="des", select= -cond)
describe(des_group)

Ejemplo 2b
describe(data[data$cond=="des",])  #Ojo a la coma

No hay comentarios: