CoCalc -- Pràctica 3.ipynb

Practica 3 (Meyci Diaz, Gisselle Sanchez y Karen Larin).

Actividades de : Meyci Dìaz, Gisselle Sanchez, Karen Larin.

⁷³ views
ubuntu2204

Kernel: R (system-wide)

In [3]:

dnorm (0,0, sqrt (0.2))
dnorm (0 ,0 ,1.0)
dnorm (0) # Cuando se omiten la media y la desviación se asumen como e y 1
dnorm (0,0, sqrt (5.0)) 
dnorm (0,-2, sqrt (0.5)) 
dnorm (-2,-2, sqrt (0.5))

Out[3]:

[1] 0.8920621

[1] 0.3989423

[1] 0.3989423

[1] 0.1784124

[1] 0.01033349

[1] 0.5641896

In [4]:

x <-seq(-4 ,4 ,0.5) 
y <-dnorm(x)
plot(x,y, type="l")

Out[4]:

In [5]:

x <-seq(-3 ,3 ,0.1) 
y <-dnorm(x)
plot(x,y, type="l")

Out[5]:

In [6]:

x <-seq ( -3 ,3 ,0.1)
y <-dnorm (x,0,sqrt(0.2)) 
plot (x,y, type ="h")

Out[6]:

In [8]:

x <-seq ( -3 ,3 ,0.1)
y <-dnorm (x,0,sqrt(0.2)) 
plot (x,y, type ="b")

Out[8]:

In [9]:

x <-seq ( -3 ,3 ,0.1)
y <-dnorm (x,0,sqrt(0.2)) 
plot (x,y, type ="p")

Out[9]:

In [10]:

pnorm(0)

Out[10]:

[1] 0.5

In [11]:

pnorm(15.7,15,0.5)

Out[11]:

[1] 0.9192433

In [12]:

1-pnorm(15.7,15,0.5)

Out[12]:

[1] 0.08075666

In [13]:

pnorm(15.7,15,0.5, lower.tail=FALSE)

Out[13]:

[1] 0.08075666

In [14]:

pnorm(150,160,10)-pnorm(140,160,10)

Out[14]:

[1] 0.1359051

In [15]:

dbinom (3,20,0.5)
dbinom(10,20,0.5)
dbinom (17,20,0.7)
dbinom (20,40,0.5)

Out[15]:

[1] 0.001087189

[1] 0.1761971

[1] 0.07160367

[1] 0.1253707

In [16]:

x<-seq(0,40,1) 
y<-dbinom(x,40,0.5)
par(mfrow=c(1,2)) 
plot(x,y,type="h") 
plot(x,y,type="b")

Out[16]:

In [17]:

pbinom(20,40,0.5)

Out[17]:

[1] 0.5626853

In [18]:

pbinom(6,15,0.25)-pbinom(2,15,0.25)

Out[18]:

[1] 0.7072919

In [19]:

1-pbinom(5,15,0.25)

Out[19]:

[1] 0.1483681

Product

Resources

Company