Kod 2.7 - NMSwBE

# Kod 2.7 Wyznaczenie przedziału ufności dla współczynnika korelacji liniowej Pearsona

library(DescTools)

n=length(cars$speed)

rho= cor(cars$speed,cars$dist)

CorCI(rho, n, conf.level = 0.95)