R and Python (#59)

* Added more to ignore files
* Added examples for python/R integration
* Added poetry env and renv for integration examples
* Updated with video embeds

---------

Co-authored-by: Susie Jentoft <coo@ssb.nogit config --global user.name Susie>

Author: sjentoft

.Rbuildignore

@@ -19,3 +19,4 @@
 LICENSE.md
 SECURITY.md
 .nojekyll
+^Python-and-R$

.gitignore

@@ -49,3 +49,240 @@ rsconnect/
 # Quarto
 /website/.quarto/
 docs/
+
+# Below from standard for SSB -
+*.ipynb
+
+
+# The section below is from the GitHub .gitignore template for Python:
+# https://raw.githubusercontent.com/github/gitignore/main/Python.gitignore
+
+# Byte-compiled / optimized / DLL files
+__pycache__/
+*.py[cod]
+*$py.class
+**/.poetry/cache/
+
+# C extensions
+*.so
+
+# Distribution / packaging
+.Python
+build/
+develop-eggs/
+dist/
+downloads/
+eggs/
+.eggs/
+lib/
+lib64/
+parts/
+sdist/
+var/
+wheels/
+share/python-wheels/
+*.egg-info/
+.installed.cfg
+*.egg
+MANIFEST
+
+# PyInstaller
+#  Usually these files are written by a python script from a template
+#  before PyInstaller builds the exe, so as to inject date/other infos into it.
+*.manifest
+*.spec
+
+# Installer logs
+pip-log.txt
+pip-delete-this-directory.txt
+
+# Unit test / coverage reports
+htmlcov/
+.tox/
+.nox/
+.coverage
+.coverage.*
+.cache
+nosetests.xml
+coverage.xml
+*.cover
+*.py,cover
+.hypothesis/
+.pytest_cache/
+cover/
+
+# Translations
+*.mo
+*.pot
+
+# Django stuff:
+*.log
+local_settings.py
+db.sqlite3
+db.sqlite3-journal
+
+# Flask stuff:
+instance/
+.webassets-cache
+
+# Scrapy stuff:
+.scrapy
+
+# Sphinx documentation
+docs/_build/
+
+# PyBuilder
+.pybuilder/
+target/
+
+# Jupyter Notebook
+.ipynb_checkpoints
+
+# IPython
+profile_default/
+ipython_config.py
+
+# pyenv
+#   For a library or package, you might want to ignore these files since the code is
+#   intended to run in multiple environments; otherwise, check them in:
+# .python-version
+
+# pipenv
+#   According to pypa/pipenv#598, it is recommended to include Pipfile.lock in version control.
+#   However, in case of collaboration, if having platform-specific dependencies or dependencies
+#   having no cross-platform support, pipenv may install dependencies that don't work, or not
+#   install all needed dependencies.
+#Pipfile.lock
+
+# UV
+#   Similar to Pipfile.lock, it is generally recommended to include uv.lock in version control.
+#   This is especially recommended for binary packages to ensure reproducibility, and is more
+#   commonly ignored for libraries.
+#uv.lock
+
+# poetry
+#   Similar to Pipfile.lock, it is generally recommended to include poetry.lock in version control.
+#   This is especially recommended for binary packages to ensure reproducibility, and is more
+#   commonly ignored for libraries.
+#   https://python-poetry.org/docs/basic-usage/#commit-your-poetrylock-file-to-version-control
+#poetry.lock
+
+# pdm
+#   Similar to Pipfile.lock, it is generally recommended to include pdm.lock in version control.
+#pdm.lock
+#   pdm stores project-wide configurations in .pdm.toml, but it is recommended to not include it
+#   in version control.
+#   https://pdm.fming.dev/latest/usage/project/#working-with-version-control
+.pdm.toml
+.pdm-python
+.pdm-build/
+
+# PEP 582; used by e.g. github.com/David-OConnor/pyflow and github.com/pdm-project/pdm
+__pypackages__/
+
+# Celery stuff
+celerybeat-schedule
+celerybeat.pid
+
+# SageMath parsed files
+*.sage.py
+
+# Environments
+.env
+.venv
+env/
+venv/
+ENV/
+env.bak/
+venv.bak/
+
+# Spyder project settings
+.spyderproject
+.spyproject
+
+# Rope project settings
+.ropeproject
+
+# mkdocs documentation
+/site
+
+# mypy
+.mypy_cache/
+.dmypy.json
+dmypy.json
+
+# Pyre type checker
+.pyre/
+
+# pytype static type analyzer
+.pytype/
+
+# Cython debug symbols
+cython_debug/
+
+# PyCharm
+#  JetBrains specific template is maintained in a separate JetBrains.gitignore that can
+#  be found at https://github.com/github/gitignore/blob/main/Global/JetBrains.gitignore
+#  and can be added to the global gitignore or merged into this file.  For a more nuclear
+#  option (not recommended) you can uncomment the following to ignore the entire idea folder.
+#.idea/
+
+# Ruff stuff:
+.ruff_cache/
+
+# PyPI configuration file
+.pypirc
+
+# The section below is from the GitHub .gitignore template for R:
+# https://raw.githubusercontent.com/github/gitignore/main/R.gitignore
+
+# History files
+.Rhistory
+.Rapp.history
+
+# Session Data files
+.RData
+.RDataTmp
+
+# User-specific files
+.Ruserdata
+
+# Example code in package build process
+*-Ex.R
+
+# Output files from R CMD build
+/*.tar.gz
+
+# Output files from R CMD check
+/*.Rcheck/
+
+# RStudio files
+.Rproj.user/
+
+# produced vignettes
+vignettes/*.html
+vignettes/*.pdf
+
+# OAuth2 token, see https://github.com/hadley/httr/releases/tag/v0.3
+.httr-oauth
+
+# knitr and R markdown default cache directories
+*_cache/
+/cache/
+
+# Temporary files created by R markdown
+*.utf8.md
+*.knit.md
+
+# R Environment Variables
+.Renviron
+
+# pkgdown site
+# SSB: The directory below is commented out because default when generating documentation with Sphinx
+#docs/
+
+# translation temp files
+po/*~
+
+# RStudio Connect folder
+rsconnect/

Python-og-R/.Rprofile

@@ -0,0 +1 @@
+source("renv/activate.R")

Python-og-R/beskytte_tabellen.R

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+# Program for å beskytte en tabell ved bruk av GaussSupression
+
+# Hent inn biblioteket
+library(GaussSuppression)
+
+# Les inn data
+tabell1 <- read.csv("/buckets/produkt/felles/r_og_python/tabell1.csv")
+
+# Kjøre SuppressSmallCounts
+tabell1_protect = SuppressSmallCounts(data = tabell1, maxN = 3, freqVar = 3, dimVar = 1:2)
+
+# Lagre data etterpå
+write.csv(tabell1_protect, file = "/buckets/produkt/felles/r_og_python/tabell1_protect.csv", row.names=FALSE)

Python-og-R/beskytte_tabellen_args.R

@@ -0,0 +1,21 @@
+# -*- coding: utf-8 -*-
+# Program for å beskytte en tabell ved bruk av GaussSupression
+
+# Hent inn biblioteket
+library(GaussSuppression)
+
+# Hent inn argumentene
+args <- commandArgs(trailingOnly = TRUE)
+tabell_navn <- args[1]
+tabell_ut <- args[2]
+
+# Les inn data
+tabell1 <- read.csv(paste0("/buckets/produkt/felles/r_og_python/", tabell_navn, ".csv"))
+
+# Kjøre SuppressSmallCounts
+tabell1_protect = SuppressSmallCounts(data = tabell1, maxN = 3, freqVar = 3, dimVar = 1:2)
+
+# Lagre data etterpå
+write.csv(tabell1_protect, 
+          file = paste0("/buckets/produkt/felles/r_og_python/", tabell_ut, ".csv"), 
+          row.names=FALSE)