Sign in

Andi Fugard

@andifugard.info
1.4K followers 1K following 55 posts

Policy evaluator. London-based, Belfast-born. They/them. Personal account – views mine. Posts auto delete after a month. Mastodon: sciences.social/@andi Web: andifugard.info DM: andifugard.info/contact

PostsRepliesMedia
Andi Fugard @andifugard.info · 29/09/2026
Recursive technology
Output from:

cs <- paste0("\033[", 31:36, "m")

cstr <- \(s, coli) {
  idx <- ((coli - 1) %% length(cs)) + 1
  paste0(cs[idx], s, "\033[0m")
}

recursive_technology <- \(n, m = 1) {
  indent <- strrep(" ", m * 2)
  if (m == n) {
    paste0(indent, cstr("technology\n", m))
  } else {
    paste0(
      indent, cstr("recursive (\n", m),
      recursive_technology(n, m + 1),
      indent, cstr(")\n", m)
    )
  }
}
recursive_technology(7) |> cat()
000
Andi Fugard @andifugard.info · 20/09/2026
Example T&Cs www.bbk.ac.uk/documents/st...
100
Andi Fugard @andifugard.info · 18/09/2026
For example, with an empty first level
200
Andi Fugard @andifugard.info · 18/09/2026
G'morning :) That was painless (thankfully)! I'll upload the code somewhere - probably worth looking at more details of the fits...
100
Andi Fugard @andifugard.info · 18/09/2026
Have you found an example where it makes much of a difference to slopes? I had go by deleting data for a level one by one and then trying with and without the empty level, using MASS::polr... Level 2 just had 5 observations so didn't expect it to make much difference.
120