zenithsiz-ist/pe-proj
1
0
Fork 0
mirror of https://github.com/Zenithsiz/ist-pe-proj.git synced 2026-02-03 14:10:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fixed 10.

Browse Source
This commit is contained in:
Filipe Rodrigues 2023-06-17 15:52:47 +01:00
parent 83124e719f
commit aaadf0bd0d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
10/script.R
View File

@ -17,7 +17,7 @@ all_samples <- lapply(1:m, function(idx) {
# Then get their t value
samples_t <- sapply(all_samples, function(samples) {
(mean(samples) - expected_mean) / (true_var / sqrt(n))
(mean(samples) - expected_mean) / sqrt(true_var / n)
})
# And check if they're accepted