Puedes seguir el tutorial por vídeo en https://youtu.be/MJxoaD2ovhU
Hay que asignar nombre y marcar las opciones que procedan. Después de hacerlo, lo recomendable es copiar el comando de la consola y pegarlo en el scrip para no tener que volver a hacerlo en sucesivas sesiones de trabajo.
Datos <- read.csv("C:/Users/Raul Ortiz/Desktop/Proyectos R/Potato.csv", na.strings="Falta")
summary(Datos)
## Tratamiento Variedad Peso40 Peso41a45 Peso46a60
## Testigo:9 Krone :10 Min. : 130.0 Min. : 300 Min. : 5880
## Tratado:9 Nicola: 8 1st Qu.: 647.5 1st Qu.:1120 1st Qu.:12430
## Median :1025.0 Median :1550 Median :13395
## Mean :1350.0 Mean :2032 Mean :13475
## 3rd Qu.:1975.0 3rd Qu.:2542 3rd Qu.:15410
## Max. :3340.0 Max. :6720 Max. :19120
## PesoMas61 Numero40 Numero41a45 Numero46a60
## Min. : 0 Min. : 3.00 Min. : 5.00 Min. : 44.0
## 1st Qu.: 500 1st Qu.:12.25 1st Qu.:16.00 1st Qu.:101.0
## Median : 790 Median :19.50 Median :24.00 Median :112.5
## Mean : 2278 Mean :27.00 Mean :26.22 Mean :107.4
## 3rd Qu.: 2355 3rd Qu.:36.25 3rd Qu.:36.25 3rd Qu.:122.5
## Max. :11780 Max. :71.00 Max. :60.00 Max. :138.0
## NumeroMas61
## Min. : 0.000
## 1st Qu.: 2.000
## Median : 3.500
## Mean : 9.889
## 3rd Qu.:13.500
## Max. :44.000
rm(Datos)
Datos3 = read.table("clipboard", header=T, sep="\t", na.strings = "Falta") # Separacion tabulada es tipica de archivos excel.
Datos4 = read.table("C:/Users/Raul Ortiz/Desktop/Proyectos R/Potato.csv", header=T, sep=",", dec=".", na.strings = "Falta", colClasses = c("factor","character","factor","numeric","numeric","numeric","numeric","numeric","numeric","numeric"))
str(Datos4)
## 'data.frame': 18 obs. of 10 variables:
## $ Tratamiento: Factor w/ 2 levels "Testigo","Tratado": 1 1 1 1 1 2 2 2 2 2 ...
## $ Variedad : chr "Krone" "Krone" "Krone" "Krone" ...
## $ Peso40 : Factor w/ 17 levels "1120","130","1300",..: 11 6 16 2 4 15 12 5 3 13 ...
## $ Peso41a45 : num 1120 1480 920 1120 1240 880 680 3620 2100 1620 ...
## $ Peso46a60 : num 16180 15600 14840 17180 12580 ...
## $ PesoMas61 : num 2360 2340 6580 11780 7040 ...
## $ Numero40 : num 9 42 16 3 22 13 7 37 25 12 ...
## $ Numero41a45: num 23 25 13 16 16 11 8 38 31 22 ...
## $ Numero46a60: num 130 124 129 125 101 138 44 107 112 113 ...
## $ NumeroMas61: num 16 14 28 44 30 12 3 3 5 4 ...
summary(Datos4)
## Tratamiento Variedad Peso40 Peso41a45
## Testigo:9 Length:18 700 : 2 Min. : 300
## Tratado:9 Class :character 1120 : 1 1st Qu.:1120
## Mode :character 130 : 1 Median :1550
## 1300 : 1 Mean :2032
## 1840 : 1 3rd Qu.:2542
## 1900 : 1 Max. :6720
## (Other):11
## Peso46a60 PesoMas61 Numero40 Numero41a45
## Min. : 5880 Min. : 0 Min. : 3.00 Min. : 5.00
## 1st Qu.:12430 1st Qu.: 500 1st Qu.:12.25 1st Qu.:16.00
## Median :13395 Median : 790 Median :19.50 Median :24.00
## Mean :13475 Mean : 2278 Mean :27.00 Mean :26.22
## 3rd Qu.:15410 3rd Qu.: 2355 3rd Qu.:36.25 3rd Qu.:36.25
## Max. :19120 Max. :11780 Max. :71.00 Max. :60.00
##
## Numero46a60 NumeroMas61
## Min. : 44.0 Min. : 0.000
## 1st Qu.:101.0 1st Qu.: 2.000
## Median :112.5 Median : 3.500
## Mean :107.4 Mean : 9.889
## 3rd Qu.:122.5 3rd Qu.:13.500
## Max. :138.0 Max. :44.000
##