Nama : Nadila Shifa Auria

NIM : 230605110072

Kelas : C

Mata Kuliah : Kalkulus

Dosen Pengajar: Prof.Dr.Suhartono,M.Kom

Program Studi : Teknik Informatika

Universitas : UIN Maulana Malik Ibrahim Malang

library(mosaicCalc)

Latihan

gaussian <- 
  makeFun((1/sqrt(2*pi*sigma^2)) * 
            exp( -(x-mean)^2/(2*sigma^2)) ~ x,
          mean=2, sigma=2.5)
slice_plot(gaussian(x) ~ x, domain(x = -5:10)) %>%
  slice_plot(gaussian(x, mean=0, sigma=1) ~ x, color="red")

erf <- antiD(gaussian(x, mean=m, sigma=s) ~ x)
erf
## function (x, C = 0, m, s) 
## {
##     F <- makeF(gaussian(x, mean = m, sigma = s))
##     evalFun(F, x = x, m = m, s = s, .const = C)
## }
## <environment: 0x0000013c49066da8>

∫2 dari 0 f(x,m = 0, s=1)dx

{0,13,0,34, 0,48 ,0,50,0,75,1,00}

erf(x = 2, m=0, s=1) - erf(x = 0, m=0, s=1)
## [1] 0.4772499

hal-hal penting yang perlu diingat:

#Fungsi antiD( )akan menghitung antiturunan.

#Antiturunan selalu diambil sehubungan dengan variabel #Integral pasti adalah fungsi dari variabel integrasi.

DAFTAR PUSTAKA

https://dtkaplan.github.io/RforCalculus/modeling-with-linear-combinations.html#example-atomic-bomb-data.