Skip to content

Instantly share code, notes, and snippets.

@bonipart
bonipart / zipf_simplified.hs
Created February 11, 2012 15:56
Problem 3 of 3, embed.ly challenge
main = print ((length . takeWhile( <= wordCount/2) . scanl1 (+) $ uniqueWords) +1)
where
uniqueWords = map (\x -> 2520 / x) [1..900] --list of unique word frequencies
wordCount = sum uniqueWords --total number of words in text
@bonipart
bonipart / stdiv.hs
Created February 11, 2012 16:01
Problem 2 of 3, embed.ly challenge
--list of <p> tag depths
ps = [1,2,1,1,1,1,1,1,1,2,2,2,3,3,3,4,4,4,4,4,5,5,5,5,1,1,1,1,1,2,1,1,1,1,2,2,1,3,1]
--compute mean of data points
avg = x/y
where
x = sum ps
y = fromIntegral(length ps)
--computes difference of data point and mean, square the result
@bonipart
bonipart / rN.hs
Created February 11, 2012 16:05
Problem 1 of 3, embed.ly challenge
import Data.Char
--creates list containing each digit from a number
intToDigList :: Integral a => a -> [Int]
intToDigList = map digitToInt . show;
--computes R(n)
rN n = sum (intToDigList( (product [1..n])))
--returns the first number,'n', for which R(n) equals 8001
#include <stdlib.h>
#include <unistd.h>
unsigned char shellcode[] =
"\x6a\x0b\x58\x99\x52\x66\x68\x2d\x63\x89\xe7\x68\x2f\x73\x68"
"\x00\x68\x2f\x62\x69\x6e\x89\xe3\x52\xe8\x08\x00\x00\x00\x2f"
"\x62\x69\x6e\x2f\x73\x68\x00\x57\x53\x89\xe1\xcd\x80";
int main(void) {
int *ret;
@bonipart
bonipart / designer.html
Last active August 29, 2015 14:09
designer
<link rel="import" href="../core-scaffold/core-scaffold.html">
<link rel="import" href="../core-header-panel/core-header-panel.html">
<link rel="import" href="../core-menu/core-menu.html">
<link rel="import" href="../core-item/core-item.html">
<link rel="import" href="../core-icon-button/core-icon-button.html">
<link rel="import" href="../core-toolbar/core-toolbar.html">
<link rel="import" href="../core-menu/core-submenu.html">
<link rel="import" href="../google-map/google-map.html">
<polymer-element name="my-element">
@bonipart
bonipart / designer.html
Last active August 29, 2015 14:09
designer
<link rel="import" href="../core-icon-button/core-icon-button.html">
<link rel="import" href="../core-toolbar/core-toolbar.html">
<link rel="import" href="../paper-button/paper-button.html">
<polymer-element name="my-element">
<template>
<style>
:host {
position: absolute;
@bonipart
bonipart / designer.html
Last active August 29, 2015 14:09
designer
<link rel="import" href="../core-scaffold/core-scaffold.html">
<link rel="import" href="../core-header-panel/core-header-panel.html">
<link rel="import" href="../core-menu/core-menu.html">
<link rel="import" href="../core-item/core-item.html">
<link rel="import" href="../core-icon-button/core-icon-button.html">
<link rel="import" href="../core-toolbar/core-toolbar.html">
<link rel="import" href="../core-menu/core-submenu.html">
<polymer-element name="my-element">
@bonipart
bonipart / designer.html
Last active August 29, 2015 14:10
designer
<link rel="import" href="../polymer/polymer.html">
<polymer-element name="name-tag">
<template>
<style>
#core_card {
position: absolute;
width: 300px;
height: 300px;