Publications by Luis Castillo

Datos salinidad NaCl

20.10.2020

knitr::opts_chunk$set(echo = TRUE) rm(list=ls()) Estos son lso datos de temperatura library(readxl) Datos_NaEl<-Base_de_datos_Salinidad_Brassinoesteroides_1_ <- read_excel("d:/Users/Janus/Documents/Fisiologia vegetal basica/Base de datos Salinidad + Brassinoesteroides parte 2.xlsx") Datos_NaEl #1.1 Anova para variable temperatura m1 <- aov(Temp...

14813 sym R (22642 sym/151 pcs)

Datos salinidad corridos

18.10.2020

knitr::opts_chunk$set(echo = TRUE) rm(list=ls()) library(readxl) Datos_NaEl <- read_excel("d:/Users/Janus/Documents/Fisiologia vegetal basica/Base de datos Salinidad + Brassinoesteroides.xlsx") Datos_NaEl #1.1 Anova para variable temperatura m1 <- aov(Temp~Trat, data = Datos_NaEl) anova(m1) #1.2 Pueba normaliada para temperatura shapiro.test(...

845 sym R (15128 sym/86 pcs)

Tarea 1 CE

13.10.2020

knitr::opts_chunk$set(echo = TRUE) 1. Para importar un archivo de excel se emplea el siguiente código: library(readxl) excel1 <- read_excel("d:/Users/Janus/Documents/Computacion estadistica/excel1.xlsx") View(excel1) head(excel1) 2. Seguidamente, instalamos la librería “psych” que es útil para el análisis multivariado y la construcci...

7578 sym R (920 sym/37 pcs)

Informe tecnico de caqueta

08.10.2020

knitr::opts_chunk$set(echo = TRUE) Este cuaderno pretende mostrar un acercamiento hacia la economia agricola del departamento de Caqueta, basado en datos espaciales y no espaciales, especificamente un archivo de evaluaciones agropecuarias del departamento y datos del marco geoestadistico nacional del año 2018 ##esta primera linea borra cualquie...

21998 sym R (18531 sym/64 pcs) 2 img

Tarea 3 CE

23.09.2020

#1. Repaso Código Integrales (aproximaciones de Área) \[\int_{0}^{2e}ln(x)dx = lim_{b \to 0}\int_{b}^{2e}ln(x)dx \] inte <- function(x) x^3 x1 <- seq(0,1,by = 0.01) plot(x1, inte(x1),type='l', col = 'blue',lwd=2) polygon(c(0,x1,1),c(0,inte(x1),0), col ='green') #2. Suma trapezoidal n <- 20 a <- 0 b <- 1 h <- (b-a)/n xi <- a+(0:n)*h;xi #...

343 sym R (3455 sym/26 pcs) 8 img

cuaderno 3

21.09.2020

#1. Introduccion. En este cuaderno ilustraremos algunas funciones para obtener, procesar y visualizar Modelos Digitales de Elevación en R. Los datos de elevación son usados en un amplio rango de aplicaciones, por ejemplo, hidrología y modelamiento ecológico. Para obtener los datos necesarios a través de R se requería de muchos paquetes, sin...

15980 sym R (5004 sym/48 pcs) 14 img

Mi primer cuaderno en R notebook

15.09.2020

1. Introduccion Hola yo soy Luis Alberto y este es mi primer R notebook donde manejare funciones basicas como las bibliotecas “simple features” (sf) y “tidyverse” (tidyverse). Tiene como proposito responder a la actividad de aprendizaje de las funcionalidades geoespaciales R en la clase de geomática básica. para empezar toca instalar y ...

2382 sym R (42157 sym/61 pcs) 7 img

Cuaderno 2 geomatica

19.09.2020

#1 introduccion Este cuaderno se realiza con el fin de presentar un codigo para realizar el calculo de pendiente y aspecto en un Raster La pendiente indica de manera cuantitativa la direcion o inclinacion de un plano. por otra parte el aspecto se refiere a la orientacion de la pendiente del plano respecto a los puntos cardinales. Para iniciar, se...

1644 sym R (2170 sym/31 pcs) 6 img

cuaderno 3a

21.09.2020

#1. Introduccion. En este cuaderno ilustraremos algunas funciones para obtener, procesar y visualizar Modelos Digitales de Elevación en R. Los datos de elevación son usados en un amplio rango de aplicaciones, por ejemplo, hidrología y modelamiento ecológico. Para obtener los datos necesarios a través de R se requería de muchos paquetes, sin...

15980 sym R (34551 sym/50 pcs) 14 img

CE 3 .1

23.09.2020

knitr::opts_chunk$set(echo = TRUE) #1. Area entre curvas de dos Funciones y1 <- function(x) {x^2/2} y2 <- function(x) {2*x} curve(y1,from = 0,to = 4, ylim = c(0,12),type = 'l') curve(y2,from = 0,to =4, add = T, col ='blue',type = 'l') x <- seq(0,4, l=100) polygon(x,y1(x),x,y2(x), col = 'darkcyan',density = 30) text(2,3,'A') text(1,4,'f(x)...

366 sym R (5210 sym/41 pcs) 5 img