La función debe llamarse genera_matriz_normal().
Los resultados deben ser replicables entre computadoras
Genera n_rows * n_cols valores aleatorios de
distribución Normal(0,1) con rnorm()
genera_matriz_normal <- function(n_rows, n_cols,semilla=13) {
#establecer semilla
set.seed(semilla)
#generar valores aleatorios
n <- n_rows * n_cols
datos <- rnorm(n, mean =0, sd = 1)
#crear la matrix
matrix(data=datos, nrow= n_rows, ncol=n_cols, byrow=FALSE, dimnames= NULL)
}
genera_matriz_normal(2,2,10)
## [,1] [,2]
## [1,] 0.01874617 -1.3713305
## [2,] -0.18425254 -0.5991677
La función grafica_cuadratica().
Genera un vector de valores x con
seq(),
Calcula y = x^2,
Grafica la curva con plot().
#generar la función
grafica_cuadratica <- function(ninicial, nfinal, numeropuntos){
#generar valor de x
x<- seq(ninicial, nfinal, length.out = numeropuntos)
#generar valor de y
y <- x^2
#generar el ploteo o gráfica
plot(x,y,xlab="las más x", ylab="las más y", main="La mejor gráfica del mundo mundial")
}
grafica_cuadratica(-5,10,30)