Skip to content

Instantly share code, notes, and snippets.

View wbreeze's full-sized avatar

Douglas Lovell wbreeze

View GitHub Profile
@wbreeze
wbreeze / output.txt
Created October 14, 2019 22:31
Using tryCatch() from R together with reduce() from Purrr
> source("tryWithError.R")
List of 7
$ :List of 4
..$ value : num 1
..$ success: logi TRUE
..$ errors : NULL
..$ data : int 1
$ :List of 4
..$ value : num 3
..$ success: logi TRUE
-----BEGIN PGP PUBLIC KEY BLOCK-----
mQINBFhqyEABEACoBJid0iyr7xKLb/VI2GHZYkVnCb0TUwPyK4QFJQ8rw7Yz6Ang
Dcilc4gEdxC83zUqxqpfuajCYxCaZEBT/+NVu0v8b05rlibHqJtDqso7REHiafm/
AsbwiIhZaU71+2aluJgXM1MQL3ihgiLR20dxIOWWJ+cl74teCA3BnjY1MQeKOw9c
M54cRKTiMRn5gb8oIj5kWg8Jx0FRtJwawcy8rpR4+N/yaZ1n1T50zvjBI6T8wqDt
YrPai+WlMsGPItqYwB3bwHySyExre9NeGSYliO621agW9yvo0yQ0P/MIvgohmOJw
4mjsO7IWE4wSFrQjsOf4bF2ieFggl+h/PZ2CYRNi6cfVfPyXSRDYPGsiHMhyQgYh
Oe7igFmiK+kDXwC553KEU7AUnpMiEGSUp8yGoipj0FMLxjbfIqVjqUi9tRe6vM4V
8m1YoO0ff2S1dsYp29LMgLfxvrn9Dj7CKCV2Pq+xwQ8PtDXT6QxbJUquBW/muvzv
@wbreeze
wbreeze / k_values_for
Created April 21, 2014 21:13
Business logic for determining IAC flight K values
def k_values_for(jCat, jFlt, jPilot)
if (jCat == 1) # primary has no free
jFlt = 1
end
if (jCat == 2) # sportsman has no unknown
jFlt = 2 if 2 < jFlt
end
case jFlt
when 2 # free
nodes = @document.find("/ContestResults/Pilots/Category[@CategoryID=#{jCat}]/Pilot[@PilotID=#{jPilot}]/FreestyleKs")