Skip to content

Instantly share code, notes, and snippets.

View SwiftsNamesake's full-sized avatar

Jonatan SwiftsNamesake

View GitHub Profile
# I have a biased coin that lands heads up with
# probability p and tails up with probability (1-p). I
# toss the coin n times. What is the probability that I
# will see at least k heads?
#
# https://www.quora.com/I-have-a-biased-coin-that-lands-heads-up-with-probability-p-and-tails-up-with-probability-1-p-I-toss-the-coin-n-times-What-is-the-probability-that-I-will-see-at-least-k-heads
def product(xs):
p = 1
for i in xs:
@SwiftsNamesake
SwiftsNamesake / left-align.hs
Created July 17, 2017 05:50
align-words.hs
-- https://stackoverflow.com/questions/30821491/haskell-take-and-drop-at-the-same-time
import Data.List (groupBy, unfoldr)
import Data.Function (on)
import Text.Printf (printf)
import Control.Monad (forM)
-- |
-- TODO | - Rename
-- - Deal with combining characters (eg. diacritics) (should probably use a Unicode-aware library)
@SwiftsNamesake
SwiftsNamesake / main.lua
Created June 29, 2016 23:03
Another attempt
Publishing selected text to a GitHub gist via Atom
@SwiftsNamesake
SwiftsNamesake / Camera.lua
Created June 29, 2016 22:10
Just trying out the gist-it atom package
--
moses = require 'src.lib.moses.moses'
vec = require 'src.vec'
local Camera = class()
-- | http://codegolf.stackexchange.com/questions/83377/write-a-program-to-elasticize-strings
elasticize :: [a] -> [a]
elasticize = concat . zipWith replicate [1..]