deltam’s gists

deltam / read-as-byte-array.clj

Created June 27, 2015 12:39

バイナリファイルを読む

	(defn read-as-byte-array [filename]
	(with-open [fis (java.io.FileInputStream. filename)]
	(let [channel (.getChannel fis)
	byte-buf (java.nio.ByteBuffer/allocate 100000)]
	(.read channel byte-buf)
	byte-buf)))

deltam / file0.txt

Last active August 29, 2015 14:24

画像を平行移動してずらす ref: http://qiita.com/deltam/items/63306db4d46224a22b43

$ convert A.png -distort Affine '10,10 3,5' B.png

deltam / gdrive_permission.go

Created December 5, 2015 13:56

Google Drive APIでアップロードしたファイルの公開範囲を変更する ref: http://qiita.com/deltam/items/e13479ef36ac6729063e

	package main

	import (
	"code.google.com/p/goauth2/oauth"
	"fmt"
	"google.golang.org/api/drive/v2"
	"log"
	"net/http"
	"os"
	)

deltam / open_pr.sh

Last active January 17, 2021 07:14

コミットIDからマージされたプルリクを開くやつ

	#!/bin/sh
	# 参考 Commit Hash から、該当 Pull Request を見つける方法 - Qiita https://qiita.com/awakia/items/f14dc6310e469964a8f7

	GITHUB_URL=`git config --get remote.origin.url \| sed -E 's#^.+(github.com):(.+)\.git$#https://\1/\2#'`
	git log --merges --oneline --reverse --ancestry-path $1...master \| grep -m 1 "Merge pull request" \| cut -f5 -d ' ' \| sed "s@#@${GITHUB_URL}/pull/@" \|xargs open

deltam / tree.clj

Last active May 13, 2018 12:52

Clojureで決定木を書く。コード生成もする

	(ns sandbox.tree
	"『集合知プログラミング』の7章を読んで決定木をプログラミングする")

	;; https://resources.oreilly.com/examples/9780596529321/blob/master/PCI_Code%20Folder/chapter7/treepredict.py
	(def my-data [["slashdot","USA","yes",18,"None"],
	["google","France","yes",23,"Premium"],
	["digg","USA","yes",24,"Basic"],
	["kiwitobes","France","yes",23,"Basic"],
	["google","UK","no",21,"Premium"],
	["(direct)","New Zealand","no",12,"None"],

deltam / _vgo_build_fail_sample.sh

Last active May 16, 2018 13:10

vgo build failed with kagome

	$ go version
	go version go1.10.2 darwin/amd64
	$ go get -u golang.org/x/vgo
	$ vgo version
	go version go1.10.2 darwin/amd64 vgo:2018-02-20.1
	$ mkdir test_vgo
	$ cd test_vgo
	$ echo >go.mod
	$ wget https://gist.githubusercontent.com/deltam/14e44c5adff91e723d2036f5f8e7ac25/raw/8048a89bb73c3bf719f5d830917ee3673b52170e/main.go
	$ vgo build

deltam / pomodoro.sh

Created June 6, 2018 13:01

ポモドーロ用のシェルスクリプト

	#!/bin/sh
	# for mac

	function message() {
	m=$1" "`date "+%H:%M"`
	osascript -e "display notification \"$m\" with title \"pomodoro notice\""
	echo $m
	say $m
	}

deltam / main.go

Last active June 15, 2018 03:09

汎用データ構造っぽいやつ

	// どんな型の配列だろうが添字はintという発想から汎用データ構造みたいなのが作れないか試してみた
	// 配列は削除が面倒なのでmapで任意の構造体を持つ
	// intキー:任意の型でintキーだけデータ構造で管理しとく
	// とりあえずStack

	package main

	import "fmt"

	func main() {

deltam / changelog.clj

Created July 1, 2018 11:20

Convert changelog memo to JSON in clojure.

	(ns sandbox.changelog
	(:require [clojure.string :refer [split blank? includes?]]
	[clojure.java.io :refer [reader]]))

	(def df (java.text.SimpleDateFormat. "yyyy-MM-dd"))

	(defn header? [line]
	(not (nil? (re-find #"^\d{4}-\d{2}-\d{2}" line))))

	(defn parse-header [line]

deltam / hoge

Last active February 4, 2021 05:03

test

MISUMI Masaru deltam