Lojistik dağılım

R'de Orta Düzey Regresyon

Richie Cotton

Data Evangelist at DataCamp

Gaussian olasılık yoğunluk fonksiyonu (PDF)

gaussian_distn <- tibble(
  x = seq(-4, 4, 0.05),
  gauss_pdf_x = dnorm(x)
)

ggplot(gaussian_distn, aes(x, gauss_pdf_x)) +
  geom_line()

gauss-pdf-çizgisi.png

Gaussian kümülatif dağılım fonksiyonu (CDF)

gaussian_distn <- tibble(
  x = seq(-4, 4, 0.05),
  gauss_pdf_x = dnorm(x),
  gauss_cdf_x = pnorm(x)
)

ggplot(gaussian_distn, aes(x, gauss_cdf_x)) +
  geom_line()

gauss-cdf-çizgisi.png

Gaussian ters CDF

gaussian_distn_inv <- tibble(
  p = seq(0.001, 0.999, 0.001),
  gauss_inv_cdf_p = qnorm(p)
)

ggplot(gaussian_distn_inv, aes(p, gauss_inv_cdf_p)) +
  geom_line()

gauss-ters-cdf-çizgisi.png

Dağılım fonksiyonu adları

eğri	önek	normal	lojistik	ipucu
PDF	d	`dnorm()`	`dlogis()`	"d" türev için – PDF, CDF’nin türevidir
CDF	p	`pnorm()`	`plogis()`	"p", tersten "q" – ters CDF’nin tersi
Ters CDF	q	`qnorm()`	`qlogis()`	"q" kantil için

glm() fonksiyonunun family argümanı

lm(response ~ explanatory, data = dataset)

glm(response ~ explanatory, data = dataset, family = gaussian)

glm(response ~ explanatory, data = dataset, family = binomial)

¹ https://campus.datacamp.com/courses/introduction-to-regression-in-r/simple-logistic-regression?ex=1

gaussian()

str(gaussian())

List of 11
 $ family    : chr "gaussian"
 $ link      : chr "identity"
 $ linkfun   :function (mu)  
 $ linkinv   :function (eta)  
 $ variance  :function (mu)  
 $ dev.resids:function (y, mu, wt)  
 $ aic       :function (y, n, mu, wt, dev)  
 $ mu.eta    :function (eta)  
 $ initialize:  expression({  n <- rep.int(1, nobs)  if (is.null(etastart) && is.null(start) &&
     is.null(mustart) &&  ((family$link| __truncated__
 $ validmu   :function (mu)  
 $ valideta  :function (eta)  
 - attr(*, "class")= chr "family"

linkfun ve linkinv

Bağ fonksiyonu (link function), yanıt değişkeninin dönüşümüdür.

gaussian()$linkfun

function (mu) 
mu

gaussian()$linkinv

function (eta) 
eta

Lojistik PDF

logistic_distn <- tibble(
  x = seq(-6, 6, 0.05),
  logistic_pdf_x = dlogis(x)
)

ggplot(logistic_distn, aes(x, logistic_pdf_x)) +
  geom_line()

lojistik-pdf-çizgisi.png

Lojistik dağılım

Lojistik dağılımın CDF’si, lojistik fonksiyon olarak da bilinir.
$\text{cdf}(x) = \frac{1}{(1 + exp(-x))}$
Lojistik dağılımın ters CDF’si, logit fonksiyonu olarak da bilinir.
$\text{inverse\_cdf}(p) = log(\frac{p}{(1 - p)})$

Hadi pratik yapalım!

R'de Orta Düzey Regresyon