xvrdm

# This file has been auto-generated by i3-config-wizard(1).
# It will not be overwritten, so edit it as you like.
#
# Should you change your keyboard layout somewhen, delete
# this file and re-run i3-config-wizard(1).
#

# i3 config file (v4)
#
# Please see http://i3wm.org/docs/userguide.html for a complete reference!

xvrdm

library(tidyverse)

raw_data <- readr::read_lines("days/d04/data.txt") %>%
  stringr::str_trim()

BOARD_SIZE <- 5

draws <- raw_data[1] %>%
  stringr::str_split(",") %>%
  .[[1]] %>%

xvrdm

library(tidyverse)

binary_flip <- function(x) ifelse(x=="1","0","1")

bits_seq_to_decimal <- function(x) strtoi(paste0(x, collapse = ""), base=2)

# Challenge 1
bits <- readr::read_lines("days/d03/data.txt") %>%
  stringr::str_split("")

xvrdm

library(tidyverse)

input <- readr::read_lines("days/d02/data.txt") %>%
  stringr::str_split(" ")

# Challenge 1
hor <- input %>%
  purrr::keep(~ .[1] == "forward") %>%
  purrr::map_dbl(~as.numeric(.[2])) %>%
  sum

xvrdm

# ------------------------------------------------------------------------------------------
# Solution with Reduce
# Challenge 1
find_increase <- function(accumulated, next_val) {
  is_increase = !is.na(accumulated$previous) && accumulated$previous < next_val
  list(
    previous = next_val,
    count = accumulated$count + ifelse(is_increase, 1, 0)
    )
}

xvrdm

GroupAdd, NoMod , ahk_exe VirtualBoxVM.exe ;Desktop

#IfWinNotActive, ahk_group NoMod
#Persistent
SetCapsLockState, AlwaysOff

; Capslock alone should send Esc
; Capslock::Send {esc}
Capslock::SendInput {Blind}{Esc}

xvrdm

  // Available variables:
  // - Machine
  // - interpret
  // - assign
  // - send
  // - sendParent
  // - spawn
  // - raise
  // - actions

xvrdm

> between(c(5,6), left = c(1,4), right = c(2,10))
[1] FALSE FALSE


> tibble(val = c(5,6), min_threshold = c(1,4), max_threshold = c(2,10)) %>% 
  mutate(is_in_range = between(val, min_threshold, max_threshold))
# A tibble: 2 x 4
    val min_threshold max_threshold is_in_range
  <dbl>         <dbl>         <dbl> <lgl>      
1     5             1             2 FALSE      

xvrdm

tribble(
~Shoe, ~Max_Size, ~Min_Size,
"sneakers", 34, 28,
"leather", 39, 30)

xvrdm

#: Color scheme {{{

foreground #ebdbb2
background #282828

#: black
color0 #282828
color8 #928374

#: red