TensorFlowでのDeep Learningによるアイドルの顔識別 のためのデータ作成 - すぎゃーんメモ
続・TensorFlowでのDeep Learningによるアイドルの顔識別 - すぎゃーんメモ の続き、というかなんというか。 前回までは「ももいろクローバーZのメンバー5人の顔を識別する」というお題でやっていたけど、対象をより広範囲に拡大してみる。 様々なアイドル、応援アプリによる自撮り投稿 あまり知られていないかもしれないけど、世の中にはものすごい数のアイドルが存在しており、毎日どこかで誰かがステージに立ち 歌って踊って頑張っている。まだまだ知名度は低くても、年間何百という頻度でライブを中心に活動している、所謂「ライブアイドル」。俗に「地下アイドル」と言ったりする。 ライブアイドル - Wikipedia そういったアイドルさんたち 活動方針も様々だけど、大抵の子たちはブログやTwitterを中心としてWebメディアも活用して積極的に情報や近況を発信していたりする。 そんな中、近年登
npm configで設定値を管理 - すぎゃーんメモ
npmって意外と高機能で、色んなこと(こんなのとか)が出来る。 で、最近知ったのがnpm config。 https://github.com/isaacs/npm/blob/master/doc/config.md ちゃんとドキュメント見たことなかったから知らなかったけど、これで諸々の設定値を保存しておいたりできる、とのこと。 例えば $ npm config set foo bar $ npm config get foo barこんなカンジでkeyとvalueを設定する。list表示でまとめて確認も可能。 $ npm config list ; userconfig /home/sugyan/.npmrc foo = "bar" ; node install prefix = /home/sugyan/.nvm/v0.4.11 ; node bin location = /home/
Objective-CでTwitter APIを使う 色々 - すぎゃーんメモ
Twitter APIの認証 Twitter APIの使用は、現在"BASIC認証"と"OAuth"の2通りの方法が用意されている。が、今年6月(？)でBASIC認証が使えなくなるという噂で、今後はAPIを使用するのにはOAuthを使用する必要が出てくるようだ。 まぁBasic認証はパスワードだだ漏れになっちゃうからやめておこうよ、という話ですかね。 Basic認証 - Wikipedia Code — OAuth iPhoneアプリでTwitter APIを使いたい場合 結構iPhoneのTwitterクライアントアプリってたくさんあるけど、どういう実装なのだろう？ 大抵は初回起動時に設定画面でユーザー名とパスワードを入力させて、それを使ってBASIC認証でアクセスしているのではないのかな？ BASIC認証を使うAPIアクセスの実装は比較的簡単。(base64エンコーディングを実装せずに
Quineの書き方メモ - すぎゃーんメモ
Perl最短 一番簡単なquineはコレ？ open 0;print<0> ただ、これは標準入力からだとダメなのでpipeで繋げる使い方はできない。 $ cat quine.pl open 0;print<0> $ perl quine.pl open 0;print<0> $ perl quine.pl | perl $ print+eval pipeでも使えるようにするには、こういう書き方がある $_=q{print"\$_=q{$_};eval"};eval これなら何度でもpipeで繋げられる。 $ cat quine2.pl $_=q{print"\$_=q{$_};eval"};eval $ cat quine2.pl | perl $_=q{print"\$_=q{$_};eval"};eval $ cat quine2.pl | perl | perl $_=q{print
Quine ruBy Perl版 - すぎゃーんメモ
Quine ruBy - まめめも 僕みたいなruby素人には何やっているのかよくわからない ＞＜ のでperl版を作ってみた。 eval (($q ||=q{1; $b=qq{$ q\x7d))}. join(chr( 2 +30)x11,( ";","BEGIN" .'{$^H|=' . ( "0x800000"),q"}eval$b"));$b=~s/\e\[.* ? m //xg;for(28,5,45,5,53,58,86,30,1, ( ( 43)),58,86,30,1,53,58,31,2,43,58,31,2 , 55,5,45,5){$~=(0,"48;5;9","48;5;1","48;5" .";15")[$_/28];substr($b,517+$i+($_%28),0 ,() ."\e[$~m");$i+=length($~)+3+($_%28) };( $n=
node.jsでhttp sessionを共有するsocket.ioのテストを書く - すぎゃーんメモ
node.js + socket.io はリアルタイムwebアプリを作るのにとても良い組み合わせだと思っています。 しかし、基本的にsocket.ioのconnectionはhttpのsessionと関連が無いので、例えばそのconnectionがログインしているユーザのものかその他のユーザのものか区別がつかない。以前はSessionWebSocketを使ってそれを判別するようにしていたのだけど、残念なことに残念なのでコレはもう使いたくない。。 そこでclientから最初にcookieを送信してもらって、そこからclientのsessionを識別する、という方法がある、と以前@masahirohさんに教えていただきました。 *1 session共有方法 クライアント側では下記のように接続時にcookieを送信するようにしておき、 var socket = new io.Socket();
nodeで空いているポートを見つける - すぎゃーんメモ
サーバのテストをするときなどに未使用のポートを使ってテストコードを走らせたい、というときがあって、PerlだとTest::TCPにempty_portというのがあって簡単に取得出来る。 $ perl -MTest::TCP -E 'say Test::TCP::empty_port' 10256引数を与えない場合は毎回違う値になるけれど、基本的に必ず空いているポート番号が返ってくる。 nodeでも同じようなのがあればいいな、と思ったのだけど多分ないのでTest::TCPを参考に自分で書いてみた。 exports.empty_port = function(callback) { port = 10000 + Math.floor(Math.random() * 1000); var net = require('net'); var socket = new net.Socket(); v
Shibuya.jsに行ってきた - すぎゃーんメモ
Test.jsを聴きにいきました。 http://shibuyajs.org/articles/2011/02/28/test Shibuya.js - Test.js : ATND 以下、自分メモ。敬称略です。 var memo = { main_talk: [{ title: 'さいきんのCUIでのJavaScriptテスト', speaker: 'hotchpotch', contents: [ // 遅刻したので前半聴けず…, 'Johnson: SpiderMonkeyをRubyから JSからRubyをつかえる', '応用 Envjs, JSDefferedのあわせ技', '思った以上に使える ふつうのJavaScriptなら動く', 'エンドツーエンドテスト 全体の振る舞いをテストしたい', 'HTMLの取得、Ajaxの実行', 'Capybara: Ruby CUIからAja
Facebook APIを叩いてみる - すぎゃーんメモ
ゆーすけべー日記の記事の影響か、自分のまわりでFacebookやり始める人が増えてきました。 なんか面白いことできないかなーと手始めにFacebook APIを使って全裸bot的な何かを作ってみようかと思ってやってみました。 サードパーティアプリの作り方、使い方などはここを参照。 Facebook Developer Documentation - 開発者向けFacebook PerlのモジュールはWWW::Facebook::APIってのがあったのだけど使い方がよくわからなかったのでFacebook::Graphってのをつかってみました。 http://search.cpan.org/~rizen/Facebook-Graph-0.0705/lib/Facebook/Graph.pm まずはアプリの登録からですね。 このへんからゴニョゴニョと入力してアプリを登録します。 Applicat
node.js+socket.ioでライブコーディング的なものを作るメモ - すぎゃーんメモ
node.jsでchatアプリっぽいもの作るメモに引き続き、第2弾。 socket.ioを使って、あるtextareaで編集した内容を出来るだけリアルタイムに別のページに反映させるもの、を作ってみた。誰かがライブでtextareaで書いているコードをwebからみんなが見られる、的な。 https://github.com/sugyan/node-socket-sample にコード置いておきます。 サーバー側jsはこんなカンジで。 var express = require('express'); var app = express.createServer(); var ejs = require('ejs'); var io = require('socket.io'); var port = 3000; app.set('view engine', 'ejs'); app.set('
List::Util::reduceとかで警告が出る - すぎゃーんメモ
List::Util::reduceとかってほとんど使ったことなくて、ちょっと使ってみようと #!/usr/bin/perl use strict; use warnings; use List::Util 'reduce'; print reduce { $a + $b } 1 .. 10; とか書いてみたら、 $ perl hoge.pl Name "main::b" used only once: possible typo at hoge.pl line 6. Name "main::a" used only once: possible typo at hoge.pl line 6. 55って警告が出る。 sort関数とかでは$aも$bも問題なく使えるのになー。 よくわからずググってみると perl - How do I prevent List::MoreUtils from
mapした結果がundefのものを除いた配列を得る - すぎゃーんメモ
知らなかった。。 my @arr = ( { key => 1 }, { key => 2 }, { key => undef }, { key => 3 } ); のようなデータに対し、全要素の"key"に対応する値を取り出したmapを得ると print "$_\n" for map { $_->{key} } @arr; 1 2 Use of uninitialized value $_ in concatenation (.) or string ... 3となる。mapの結果はundefも含む4要素の配列ということになる。 ここからundefのやつを除きたい、というとき、今までずっと print "$_\n" for (grep { defined } map { $_->{key} } @arr); ってやってmap後のものをdefinedで篩にかけてた。けど print "$_
カッコつけないPerl、カッコつけすぎなPerl - すぎゃーんメモ
http://e-arrows.sakura.ne.jp/2010/08/is-lisp-really-has-too-many-parenthesis.html perlでカッコを使わないように階乗を計算するにはどうしたら良いんだろう？ 再帰を使うとどうしてもサブルーチン定義で"{", "}"を使うことになってしまいそう、じゃあ後置for文とかmapとかでループまわして全部かけ算かな、と eval q#$a=1;$a*=$_ for 1..$_;print"$_! = $a\n"#for 1..pop||1 map s//$a=1;map$a*=$_,1..$_;print"$_! = $a\n"/e,1..pop||1 とか考えてみた。一応0個。うーん、これくらいしか思いつかない。 もしくは use Math::Pari 'ifact';printf"$_! = %s\n",ifact
10種類の記号で書くPerlワンライナーの作り方 - すぎゃーんメモ
java-ja温泉にて、Pythonのワンライナーがキモいという話が出ていて、Perlだってこれくらいキモいの書けるよ！とアピールしてみた perl -e '""!~("(?{".("{^(?)!(?^{^^!){.^^~~?}{!~}^}^.(!~}!..^^!~}!~~.~^}"^"^}((~))~~^{.{^~?}^!^}(~{^)?()^)^!).^}!()){.^)(}.("^"!~!{}(!(!~((}}!})!^^{^){(.?}{}!~{^~!)^?..(~)!~.?."^"{{?}^(~)~^!..~)??){^.~){.~(!{.)}}^.}^~}?}.^}(^?{~"^".)^!?^(.)!~!)~{^{(}){?!^.~)({?)(^.^!.^{((^!!^(^(!"^"!})^?}^(?^(~{.)(}})!.?^~!!{~))}({^^!..)^^~?{.?).
screenでコピーした文字列を他のアプリケーションでもペーストできるようにする設定 - すぎゃーんメモ
以前も調べたはずだけど結局ずっと何もやってなくて不便な思いをしていて、いい加減アレだなーと思い screenのcopy modeでコピーしたのをMacのクリップボードにいれる(pbpasteで使えるようにする)のってどうするのがベストなんでしょう？ 2010-07-05 23:51:54 via web と投げてみたところ、また素早く回答いただけました。@claivyさん、ありがとうございます！ . @sugyan eval "stuff 'pbcopy\012'" "paste ." "stuff '\012\004'" こんなんは？ 2010-07-06 00:12:35 via TweetDeck もっと真面目に，ファイルに取って(bufferfile ファイル名)，pbcopy ファイル名 の方が良い気がしてきた．さっきのは改行が追加されちゃうからなー． 2010-07-06 00
ハッシュの初期化の注意点 - すぎゃーんメモ
#!/usr/bin/perl use strict; use warnings; use Data::Dumper; my $hashref = { hoge => 100, fuga => 200, piyo => 300, }; print Dumper $hashref; と、ハッシュ初期化時にkeyとvalueの組み合わせをまとめて指定することがあると思います。 $ perl hoge.pl $VAR1 = { 'piyo' => 300, 'fuga' => 200, 'hoge' => 100 }; ここで、valueの部分にサブルーチンやメソッドからの返り値を入れるようにするときに注意。 #!/usr/bin/perl use strict; use warnings; use Data::Dumper; my $hashref = { hoge => 100, fuga
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
