Skip to content

Instantly share code, notes, and snippets.

@njtierney
Created March 14, 2024 03:22
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save njtierney/75720aae484bfed26739d4ebc7e51ce6 to your computer and use it in GitHub Desktop.
Save njtierney/75720aae484bfed26739d4ebc7e51ce6 to your computer and use it in GitHub Desktop.
bee_trips <- 1:10

sample(bee_trips,
       size = 100,
       replace = TRUE)
#>   [1]  2  4  5  2  3  7  5  8  5  7  6  2  8  4 10  6  2  3 10  4  6  8  9  5  6
#>  [26]  6  8  7  6  8  5  4  7  5  6  3  5  3  7  1  9  4  8  7  8  3 10  3  5 10
#>  [51] 10  5  8  6  2  6  6  3  6  5  9  6  5  9  6  9  2  5  6  4  8  4  6  2  7
#>  [76]  8  9 10  7  1  3  4  5  5  4  6  8  6  2  4  5  9 10  5  9  4  5  2  5  3


some_samples <- rnorm(100, mean = 0, sd = 1)
mean(some_samples)
#> [1] 0.1367687
sd(some_samples)
#> [1] 0.9854487

repeated_samples <- replicate(
  n = 5,
  expr = rnorm(10000, mean = 0, sd = 1)
)

apply(repeated_samples,
      MARGIN = 2,
      FUN = mean)
#> [1] -0.0042172452  0.0004331823 -0.0081490056  0.0014312817 -0.0065029694

many_sds <- apply(repeated_samples,
      MARGIN = 2,
      FUN = sd)

many_sds / sqrt(10)
#> [1] 0.3175684 0.3173145 0.3178522 0.3162013 0.3134424

Created on 2024-03-14 with reprex v2.1.0

Session info
sessioninfo::session_info()
#> ─ Session info ───────────────────────────────────────────────────────────────
#>  setting  value
#>  version  R version 4.3.3 (2024-02-29)
#>  os       macOS Sonoma 14.3.1
#>  system   aarch64, darwin20
#>  ui       X11
#>  language (EN)
#>  collate  en_US.UTF-8
#>  ctype    en_US.UTF-8
#>  tz       Australia/Hobart
#>  date     2024-03-14
#>  pandoc   3.1.1 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/ (via rmarkdown)
#> 
#> ─ Packages ───────────────────────────────────────────────────────────────────
#>  package     * version date (UTC) lib source
#>  cli           3.6.2   2023-12-11 [1] CRAN (R 4.3.1)
#>  digest        0.6.34  2024-01-11 [1] CRAN (R 4.3.1)
#>  evaluate      0.23    2023-11-01 [1] CRAN (R 4.3.1)
#>  fastmap       1.1.1   2023-02-24 [1] CRAN (R 4.3.0)
#>  fs            1.6.3   2023-07-20 [1] CRAN (R 4.3.0)
#>  glue          1.7.0   2024-01-09 [1] CRAN (R 4.3.1)
#>  htmltools     0.5.7   2023-11-03 [1] CRAN (R 4.3.1)
#>  knitr         1.45    2023-10-30 [1] CRAN (R 4.3.1)
#>  lifecycle     1.0.4   2023-11-07 [1] CRAN (R 4.3.1)
#>  magrittr      2.0.3   2022-03-30 [1] CRAN (R 4.3.0)
#>  purrr         1.0.2   2023-08-10 [1] CRAN (R 4.3.0)
#>  R.cache       0.16.0  2022-07-21 [2] CRAN (R 4.3.0)
#>  R.methodsS3   1.8.2   2022-06-13 [2] CRAN (R 4.3.0)
#>  R.oo          1.26.0  2024-01-24 [2] CRAN (R 4.3.1)
#>  R.utils       2.12.3  2023-11-18 [2] CRAN (R 4.3.1)
#>  reprex        2.1.0   2024-01-11 [2] CRAN (R 4.3.1)
#>  rlang         1.1.3   2024-01-10 [1] CRAN (R 4.3.1)
#>  rmarkdown     2.25    2023-09-18 [1] CRAN (R 4.3.1)
#>  rstudioapi    0.15.0  2023-07-07 [1] CRAN (R 4.3.0)
#>  sessioninfo   1.2.2   2021-12-06 [2] CRAN (R 4.3.0)
#>  styler        1.10.2  2023-08-29 [2] CRAN (R 4.3.0)
#>  vctrs         0.6.5   2023-12-01 [1] CRAN (R 4.3.1)
#>  withr         3.0.0   2024-01-16 [1] CRAN (R 4.3.1)
#>  xfun          0.42    2024-02-08 [1] CRAN (R 4.3.1)
#>  yaml          2.3.8   2023-12-11 [1] CRAN (R 4.3.1)
#> 
#>  [1] /Users/nick/Library/R/arm64/4.3/library
#>  [2] /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/library
#> 
#> ──────────────────────────────────────────────────────────────────────────────
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment