Skip to content

Instantly share code, notes, and snippets.

@njtierney
Last active April 30, 2024 00:20
Show Gist options
  • Save njtierney/c8b3d2871995d7e3b877b8d52ac8ab50 to your computer and use it in GitHub Desktop.
Save njtierney/c8b3d2871995d7e3b877b8d52ac8ab50 to your computer and use it in GitHub Desktop.
library(tibble)
library(tidyverse)
ihr_car_ratio <- greta::uniform(0,1)
#> ℹ Initialising python and checking dependencies, this may take a moment.
#> ✔ Initialising python and checking dependencies ... done!
#> 

ihr_car_ratio
#> greta array (variable following a uniform distribution)
#> 
#>      [,1]
#> [1,]  ?

greta_data <- tibble(
    x = 1:10,
    car_ratio = ihr_car_ratio
) 

# print method in a tibble is overwritten somehow
greta_data
#> # A tibble: 10 × 2
#>        x car_ratio[,1] 
#>    <int> <gret_rry[,1]>
#>  1     1 NA            
#>  2     2 car_ratio[,1] 
#>  3     3 <gret_rry[,1]>
#>  4     4 NA            
#>  5     5 car_ratio[,1] 
#>  6     6 <gret_rry[,1]>
#>  7     7 NA            
#>  8     8 car_ratio[,1] 
#>  9     9 <gret_rry[,1]>
#> 10    10 NA

# the data is still a normal greta uniform however
greta_data$car_ratio
#> greta array (variable following a uniform distribution)
#> 
#>      [,1]
#> [1,]  ?

# you can do greta-things with it!
greta_data |> 
    mutate(
        samples = greta::calculate(car_ratio, nsim = 1),
        samples_dbl = as.numeric(samples)
    ) 
#> # A tibble: 10 × 4
#>        x car_ratio[,1]  samples           samples_dbl
#>    <int> <gret_rry[,1]> <named list>            <dbl>
#>  1     1 NA             <dbl [1 × 1 × 1]>       0.223
#>  2     2 car_ratio[,1]  <dbl [1 × 1 × 1]>       0.223
#>  3     3 <gret_rry[,1]> <dbl [1 × 1 × 1]>       0.223
#>  4     4 NA             <dbl [1 × 1 × 1]>       0.223
#>  5     5 car_ratio[,1]  <dbl [1 × 1 × 1]>       0.223
#>  6     6 <gret_rry[,1]> <dbl [1 × 1 × 1]>       0.223
#>  7     7 NA             <dbl [1 × 1 × 1]>       0.223
#>  8     8 car_ratio[,1]  <dbl [1 × 1 × 1]>       0.223
#>  9     9 <gret_rry[,1]> <dbl [1 × 1 × 1]>       0.223
#> 10    10 NA             <dbl [1 × 1 × 1]>       0.223

Created on 2024-04-30 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-04-30
#>  pandoc   3.1.1 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/ (via rmarkdown)
#> 
#> ─ Packages ───────────────────────────────────────────────────────────────────
#>  package     * version    date (UTC) lib source
#>  backports     1.4.1      2021-12-13 [1] CRAN (R 4.3.0)
#>  base64enc     0.1-3      2015-07-28 [1] CRAN (R 4.3.0)
#>  callr         3.7.6      2024-03-25 [1] CRAN (R 4.3.1)
#>  cli           3.6.2      2023-12-11 [1] CRAN (R 4.3.1)
#>  coda          0.19-4.1   2024-01-31 [2] CRAN (R 4.3.1)
#>  codetools     0.2-20     2024-03-31 [2] CRAN (R 4.3.1)
#>  colorspace    2.1-0      2023-01-23 [1] CRAN (R 4.3.0)
#>  crayon        1.5.2      2022-09-29 [1] CRAN (R 4.3.0)
#>  digest        0.6.35     2024-03-11 [1] CRAN (R 4.3.1)
#>  dplyr       * 1.1.4      2023-11-17 [1] CRAN (R 4.3.1)
#>  evaluate      0.23       2023-11-01 [1] CRAN (R 4.3.1)
#>  fansi         1.0.6      2023-12-08 [1] CRAN (R 4.3.1)
#>  fastmap       1.1.1      2023-02-24 [1] CRAN (R 4.3.0)
#>  forcats     * 1.0.0      2023-01-29 [1] CRAN (R 4.3.0)
#>  fs            1.6.3      2023-07-20 [1] CRAN (R 4.3.0)
#>  future        1.33.2     2024-03-26 [1] CRAN (R 4.3.1)
#>  generics      0.1.3      2022-07-05 [1] CRAN (R 4.3.0)
#>  ggplot2     * 3.5.0      2024-02-23 [1] CRAN (R 4.3.1)
#>  globals       0.16.3     2024-03-08 [1] CRAN (R 4.3.1)
#>  glue          1.7.0      2024-01-09 [1] CRAN (R 4.3.1)
#>  greta         0.4.4.9000 2024-04-30 [1] local
#>  gtable        0.3.4      2023-08-21 [1] CRAN (R 4.3.0)
#>  hms           1.1.3      2023-03-21 [1] CRAN (R 4.3.0)
#>  htmltools     0.5.8.1    2024-04-04 [1] CRAN (R 4.3.1)
#>  jsonlite      1.8.8      2023-12-04 [1] CRAN (R 4.3.1)
#>  knitr         1.45       2023-10-30 [1] CRAN (R 4.3.1)
#>  lattice       0.22-6     2024-03-20 [1] CRAN (R 4.3.1)
#>  lifecycle     1.0.4      2023-11-07 [1] CRAN (R 4.3.1)
#>  listenv       0.9.1      2024-01-29 [2] CRAN (R 4.3.1)
#>  lubridate   * 1.9.3      2023-09-27 [1] CRAN (R 4.3.1)
#>  magrittr      2.0.3      2022-03-30 [1] CRAN (R 4.3.0)
#>  Matrix        1.6-5      2024-01-11 [1] CRAN (R 4.3.1)
#>  munsell       0.5.1      2024-04-01 [1] CRAN (R 4.3.1)
#>  parallelly    1.37.1     2024-02-29 [1] CRAN (R 4.3.1)
#>  pillar        1.9.0      2023-03-22 [1] CRAN (R 4.3.0)
#>  pkgconfig     2.0.3      2019-09-22 [1] CRAN (R 4.3.0)
#>  png           0.1-8      2022-11-29 [1] CRAN (R 4.3.0)
#>  prettyunits   1.2.0      2023-09-24 [1] CRAN (R 4.3.1)
#>  processx      3.8.4      2024-03-16 [1] CRAN (R 4.3.1)
#>  progress      1.2.3      2023-12-06 [1] CRAN (R 4.3.1)
#>  ps            1.7.6      2024-01-18 [1] CRAN (R 4.3.1)
#>  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)
#>  R6            2.5.1      2021-08-19 [1] CRAN (R 4.3.0)
#>  Rcpp          1.0.12     2024-01-09 [1] CRAN (R 4.3.1)
#>  readr       * 2.1.5      2024-01-10 [1] CRAN (R 4.3.1)
#>  reprex        2.1.0      2024-01-11 [2] CRAN (R 4.3.1)
#>  reticulate    1.36.0     2024-04-15 [2] CRAN (R 4.3.1)
#>  rlang         1.1.3      2024-01-10 [1] CRAN (R 4.3.1)
#>  rmarkdown     2.26       2024-03-05 [1] CRAN (R 4.3.1)
#>  rstudioapi    0.16.0     2024-03-24 [1] CRAN (R 4.3.1)
#>  scales        1.3.0      2023-11-28 [1] CRAN (R 4.3.1)
#>  sessioninfo   1.2.2      2021-12-06 [2] CRAN (R 4.3.0)
#>  stringi       1.8.3      2023-12-11 [1] CRAN (R 4.3.1)
#>  stringr     * 1.5.1      2023-11-14 [1] CRAN (R 4.3.1)
#>  styler        1.10.3     2024-04-07 [2] CRAN (R 4.3.1)
#>  tensorflow    2.16.0     2024-04-15 [2] CRAN (R 4.3.1)
#>  tfautograph   0.3.2      2021-09-17 [2] CRAN (R 4.3.0)
#>  tfruns        1.5.2      2024-01-26 [2] CRAN (R 4.3.1)
#>  tibble      * 3.2.1      2023-03-20 [1] CRAN (R 4.3.0)
#>  tidyr       * 1.3.1      2024-01-24 [1] CRAN (R 4.3.1)
#>  tidyselect    1.2.1      2024-03-11 [1] CRAN (R 4.3.1)
#>  tidyverse   * 2.0.0      2023-02-22 [2] CRAN (R 4.3.0)
#>  timechange    0.3.0      2024-01-18 [1] CRAN (R 4.3.1)
#>  tzdb          0.4.0      2023-05-12 [1] CRAN (R 4.3.0)
#>  utf8          1.2.4      2023-10-22 [1] CRAN (R 4.3.1)
#>  vctrs         0.6.5      2023-12-01 [1] CRAN (R 4.3.1)
#>  whisker       0.4.1      2022-12-05 [1] CRAN (R 4.3.0)
#>  withr         3.0.0      2024-01-16 [1] CRAN (R 4.3.1)
#>  xfun          0.43       2024-03-25 [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
#> 
#> ─ Python configuration ───────────────────────────────────────────────────────
#>  python:         /Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2/bin/python
#>  libpython:      /Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2/lib/libpython3.9.dylib
#>  pythonhome:     /Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2:/Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2
#>  version:        3.9.18 | packaged by conda-forge | (main, Dec 23 2023, 16:35:41)  [Clang 16.0.6 ]
#>  numpy:          /Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2/lib/python3.9/site-packages/numpy
#>  numpy_version:  1.26.4
#>  tensorflow:     /Users/nick/Library/r-miniconda-arm64/envs/greta-env-tf2/lib/python3.9/site-packages/tensorflow
#>  
#>  NOTE: Python version was forced by use_python() function
#> 
#> ──────────────────────────────────────────────────────────────────────────────
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment