Skip to content

Instantly share code, notes, and snippets.

View Kuchitama's full-sized avatar
:octocat:

Kuchitama Kuchitama

:octocat:
  • Monstar Lab
  • Osaka
View GitHub Profile
function global:prompt {
$now = Get-Date -format "yyyy/MM/dd HH:mm"
Write-Host($now + " ") -nonewline
return "> "
}
@Kuchitama
Kuchitama / MapDefaults.clj
Created June 12, 2012 17:09
Sample Answer for 4Clojure#156
;; 4Clojure #156 Map Defaults
(fn [v ks] (zipmap ks (repeat (count ks) v)))
@Kuchitama
Kuchitama / PenultimateElement.clj
Created June 12, 2012 23:58
Sample Answer for 4Clojure#20. I tried to use "recur".
;; kuchitama's solution to Penultimate Element
;; https://4clojure.com/problem/20
#(if (= 2 (count %))
(first %)
(recur (rest %)))
@Kuchitama
Kuchitama / Probrem1.clj
Created November 13, 2012 14:28
Solved Project Euler by clojure
(apply +
(filter #(or (= (mod % 3) 0) (= (mod % 5) 0))
(range 1 1000)))
@Kuchitama
Kuchitama / other-pattern.clj
Created December 1, 2012 06:09 — forked from irof/Hoge.java
コレクションをぶんまわしてみる
// Original source written by irof.
List list = [
[color:'blue', weight:10],
[color:'red', weight:30],
[color:'blue', weight:50],
]
// Javaで
int weight1 = 0;
@Kuchitama
Kuchitama / .vimrc
Created December 4, 2012 00:13
NeoBundleのインストール ref: http://qiita.com/items/68b6b5d5ed40f6f96310
"GitHubリポジトリにあるプラグインを利用場合
NeoBundle 'tpope/vim-fugitive'
"GitHub以外のGitリポジトリにあるプラグインを利用する場合
NeoBundle 'git://git.wincent.com/command-t.git'
"Git以外のリポジトリにあるプラグインをを利用する場合
NeoBundle 'http://svn.macports.org/repository/macports/contrib/mpvim/'
NeoBundle 'https://bitbucket.org/ns9tks/vim-fuzzyfinder'
@Kuchitama
Kuchitama / hentai.dict
Created December 4, 2012 15:06
変態アドベントカレンダー2012 4日目の記事で紹介した、vimを変態にするための設定ファイル群 http://d.hatena.ne.jp/kuchitama/20121204
変態
hentai_advent
daiksy
dpoject21
backpaper0
kuchitama
はがねのつるぎ
_funya
ponkore
もじゃ変
@Kuchitama
Kuchitama / Euler0009_1.scala
Last active December 11, 2015 09:18 — forked from zerosum/Euler0009.scala
Other patterns of [zerosum's answer](https://gist.github.com/4578404)
/** try to use Tuple */
object Euler0009 {
private val max = 1000
def main(args: Array[String]) {
println(
triplet(1, 2).filter{ case(a, b, c) => a*a + b*b == c*c}
.map{case (a, b, c) => a * b * c}
)
@Kuchitama
Kuchitama / totuzen.vim
Created February 7, 2013 14:56
vimで、突然の死 ジェネレータを作ってみた
" 突然の死コマンド
command! -nargs=1 Totuzen call g:totuzen(<args>)
" 突然の死ジェネレート関数
function! g:totuzen(str)
" 文字列(バイト数)を取得
let char_num = strlen(a:str)
" 実際の文字数を取得
let mchar_num = s:mojisu(a:str)
@Kuchitama
Kuchitama / _run chef-solo
Last active December 17, 2015 04:08
Sample of Chef recipe to install nginx.
sudo chef-solo -c solo.rb -j ./product.json