Skip to content

Instantly share code, notes, and snippets.

@ooharak
ooharak / corpus.py
Last active June 17, 2022 10:42
「あ・い・う・え・お」の各段が一音ずつ含まれる単語を抽出
#!/usr/bin/env python3
# -*- coding: utf-8 -*-
#
# 松下達彦(2011) 「日本語を読むための語彙データベース(VDRJ) Ver.1.0 (研究用)」
# http://www17408ui.sakura.ne.jp/tatsum/database/VDRJ_Ver1_1_Research_Top60894.xlsx
# ダウンロード:2022年6月17日
#
# から「あ・い・う・え・お」の各段が一音ずつ含まれる単語を抽出する。
# (動詞・音引きは除外 。 促音は許容)
import java.util.Arrays;
public class ArrayStreamExample {
public static void main(String[] args) {
int[] data = new int[] { 2, 4, 6, 9, 11 };
String result = Arrays.stream(data).filter((e) -> (e % 2 == 0))
.boxed()
.map(e -> String.format("<%d>", e))
//.mapToObj(e -> String.format("<%d>", e))
@ooharak
ooharak / jmonad.hs
Created September 13, 2014 09:39
Maybeとかリストの復習用日本語オレメモ
{- 学習用
復習として、Maybeやリストを改めて実装してみる.
本物と区別するために日本語を使う。
数学や情報科学の用語とあっていないのは気にしない。
大文字・小文字の区別がないと識別子として認識されないので
識別子の先頭はラテン文字にした
-}
import Control.Monad
@ooharak
ooharak / epstrim.sh
Created September 6, 2014 10:50
EPS: Calculate bounding box and fit
#!/bin/sh
if [ $# -ne 1 ]; then
echo Usage: $0 eps \> svg
exit 1
fi
SRCFILE=$1
BBOXFILE=$(mktemp tmp.XXXXXX)
trap "rm -f $BBOXFILE" EXIT
@ooharak
ooharak / file0.sh
Last active August 29, 2015 14:05
Graphvizの中でSVGシェイプを使うとエラーになる件の対処(解決) ref: http://qiita.com/ooharak/items/2b43e11986b43cdd3299
$ cat k.dot
digraph {
a [image="elb.svg"]
}
$ dot -Tpdf k.dot > /dev/null
Warning: No loadimage plugin for "svg:cairo"
@ooharak
ooharak / file0.sh
Last active August 29, 2015 14:05
AWSシンプルアイコンをGraphviz等で使うときのTIPS ref: http://qiita.com/ooharak/items/12c3c812c2a30753f52e
$ find ~/Downloads/AWS_Simple_Icons_svg_eps/ -name '*Load\ Balancing.eps' -exec cp {} elb-org.eps \;
@ooharak
ooharak / a.md
Last active August 29, 2015 14:05
Pandoc+beamer+GraphvizでAWSの図を描く ref: http://qiita.com/ooharak/items/78f79fe8a57668550a82
## サンプル

~~~{.graphviz width="0.8"}
#define ICON(name) peripheries=0 image="awsicons/"+name+".png"
digraph {
 ELB [ICON("elb")]
 インスタンスa [ICON("instance")]
 インスタンスb [ICON("instance")]
 ELB -> {インスタンスa インスタンスb}

}

#if defined(_GRAPHVIZ_FILETYPE_pdf)
#define _AWS_EXT "-fit.svg"
#elif defined(_GRAPHVIZ_FILETYPE_ps)
#define _AWS_EXT "-fit.svg"
#elif defined(_GRAPHVIZ_FILETYPE_ps2)
#define _AWS_EXT "-fit.svg"
#else
#define _AWS_EXT ".png"
#endif
@ooharak
ooharak / gist:e798e7e229f6c52228cb
Created August 28, 2014 13:58
Ghostscript command line to produce a png
gs -dNOPAUSE -dBATCH -q -sDEVICE=pngalpha -dEPSCrop -sOutputFile=- -r72 instance.eps > instance.png
@ooharak
ooharak / ashttp.sh
Created August 28, 2014 13:27
usage: ./ashttp.sh 'text/html;charset=utf-8' < index.html | nc -l 8080
#!/bin/sh
if [ $# -eq 0 ]; then
mime='text/plain;charset=utf-8'
else
mime="$1"
fi
CR=$'\x0d'