tests/test_test_linear_PA.R

library("PAFit")
set.seed(1)

for (iii in 1) {
    net   <- generate_BA(N = 50)
    stats <- get_statistics(net, only_PA = TRUE)
    u     <- test_linear_PA(stats$final_deg)
    print(u)
}
thongphamthe/PAFit documentation built on March 30, 2024, 4:14 p.m.