ITエンジニアのメタ・ノート

PostgreSQLで統計解析 PL/R 基礎編3 : CRAN(Rライブラリ)利用

2012-03-11T23:09:00.001+09:00

CRAN

perlにCPANがあるように、CRANというRのモジュールを公開するネットワークがあり、多くのプログラムが公開されている。
The Comprehensive R Archive Network

下記記事を参考に、PL/RでCRANから取得したモジュールを利用してみる。
zooパッケージを使って行列の欠損値を補間する(R Advent Calendar 2011) - My Life as a Mock Quant

Install R Package

パッケージのinstallはRから


r #R起動
> install.packages("zoo")

Use R Package

パッケージはlibrary(zoo)で読み込み。
行列の欠損を補完する関数を作成


CREATE OR REPLACE FUNCTION na_locf(matrix int4[][]) RETURNS int4[][] AS '
    library(zoo);
    return(na.locf(matrix))
' LANGUAGE 'plr';
SELECT na_locf(ARRAY[ARRAY[1,2,3],ARRAY[4,null,6],ARRAY[7,8,9]]);
-- nullが2で補完される。

CREATE OR REPLACE FUNCTION na_approx(matrix int4[][]) returns int4[][] as ' 
    library(zoo);
    return(0.5 * (na.approx(matrix) + t(na.approx(t(matrix)))))
' LANGUAGE 'plr';
SELECT na_approx(ARRAY[ARRAY[1,2,3],ARRAY[4,null,6],ARRAY[7,8,9]]);
--nullが5で補完される。

PostgreSQLとRのデータ構造の違いに気をつければライブラリの使用は比較的簡単

PostgreSQLで統計解析 PL/R 基礎編2 : R用データ読み込み

2012-03-11T22:50:00.000+09:00

前回に続き、
今回はR用のサンプルデータを読み込んでPostgreSQLのデータとして受け取ってみる。

Test Data

データ集めは下記を参考に
統計を学びたい人へ贈る、統計解析に使えるデータセットまとめ - ほくそ笑む

今回は、世界の48都市の経済状態を記録したデータのcsvを読み込んでみる。

Composite Type Sample

読み込むcsvは文字列と数値が含まれており、Rではデータフレームという形式で読み込まれる。
データフレーム形式のデータはPostgreSQLでは複合型として受け取れる。
PL/Rのマニュアル記載のサンプルは下記の通り。

CREATE TYPE emp AS (
    name text
    ,age int2
    ,salary int4
);
CREATE OR REPLACE FUNCTION get_emps() RETURNS SETOF emp AS '
   names <- c("Joe","Jim","Jon")
   ages <- c(41,25,35)
   salaries <- c(250000,120000,50000)
   df <- data.frame(name = names, age = ages, salary = salaries)
   return(df)
' LANGUAGE 'plr';

SELECT * FROM get_emps();
/*
name | age | salary
text | smallint | integer
------+-----+-----------
Joe | 41 | 250000
Jim | 25 | 120000
Jon | 35 | 50000
*/

複合型を作成するのが手間なので、下記のようにしてみたらうまくいった。

CREATE OR REPLACE FUNCTION get_emps(out name text, out age int4, out salary int4) RETURNS SETOF record AS '
   names <- c("Joe","Jim","Jon")
   ages <- c(41,25,35)
   salaries <- c(250000,120000,50000)
   df <- data.frame(name = names, age = ages, salary = salaries)
   return(df)
' LANGUAGE 'plr';
SELECT * from get_emps();

が、引数を与えた場合はうまく動作しない模様…。
マニュアルにもデータフレームをsetof recordで返せるとは明示されていないので、対応範囲外なのかもしれない。

Get CityEcon

では、本題のcityecon.csvを読み込んでみる。

CREATE TYPE cityecon AS (
    city text
    ,work int4
    ,price float8
    ,salary float8
);
CREATE OR REPLACE FUNCTION get_cityecon(csvpath text) RETURNS setof cityecon AS '
    x <- read.csv(csvpath)
    return(x)
' LANGUAGE 'plr';
SELECT * FROM get_cityecon('/path-to-csv/cityecon.csv');
-- ERROR:  invalid input syntax for integer: "-"

元データにnull値として"-"が入っているためエラー。
Rで"-"をNAに置き換えておく。

CREATE OR REPLACE FUNCTION get_cityecon(csvpath text) RETURNS setof cityecon AS '
    x <- read.csv(csvpath)
    x$Work <- ifelse(x$Work=="-", NA, x$Work) 
    x$Salary <- ifelse(x$Salary=="-", NA, x$Salary) 
    return(x)
' LANGUAGE 'plr';
SELECT * FROM get_cityecon('/path-to-csv/cityecon.csv');
-- OK

さらに、CSV以外のファイル形式にも対応できるようにしてみる。

CREATE OR REPLACE FUNCTION get_cityecon(path text, header boolean, separator text) RETURNS setof cityecon AS '
    if(is.null(separator)){
        sep <- ""
    } else sep <- separator    
    if(header){
        x <- read.table(path, header = T, sep = sep)
    }else{
        x <- read.table(path, header = F, sep = sep)
    }
    x$Work <- ifelse(x$Work=="-", NA, x$Work) 
    x$Salary <- ifelse(x$Salary=="-", NA, x$Salary) 
    return(x)
' LANGUAGE 'plr';
SELECT * FROM get_cityecon('/path-to-csv/cityecon.csv', true, ',')
-- OK

データの区切り文字とヘッダーが含まれるかどうかを指定可能。

読み込むデータに合わせて複合型を作成したり、NULL値の変換をしたりと結構めんどくさい。
もうちょっと簡単に読み込みたいなあという感想。

PostgreSQLで統計解析 PL/R 基礎編 : PostgreSQL Advent Calendar #6

2011-12-06T01:39:00.000+09:00

PostgreSQL Advent Calendar 12/6 です。

ネタを決めるにあたり、analyticsをテーマに何かないものかと探してみたら、
PL/R(R手続き型言語)なるものがあるそうで。

Rは統計解析分野で人気のプログラミング言語。
オープンソースで、コミュニティの活動も活発なようです。
参考：R Advent Calendar 2011 : ATND

では、PL/Rを導入して、ちょこっと触ってみます。

Install
今回構築した環境は下記。
・Mac OS X 10.6 Snow Leopard
・gcc 4.2.1
・postgresql 9.0.4
・R 2.14.0
・plr-8.3.0.13

Windows,Linuxへのインストールは下記をご参考
R と PostgreSQL - RjpWiki

まずRをインストール。
(macのhomebrewを使用)

brew install r
Error: This formula requires a fortran compiler

失敗。fortranコンパイラをインストールして再チャレンジ。

brew install gfortran
brew install r

OK。インストール時に一般的なインストール先に
リンクさせた方がいいよとメッセージが出るので、

sudo ln -s "/usr/local/Cellar/r/2.14.0/R.framework" /Library/Frameworks

これでRのインストールは完了。
なお、パッケージインストールも可能。
参考：R for Mac OS X

次にPL/Rをインストール。
ソースは→ http://joeconway.com/plr/ から入手。

su - postgres
cd /path-to-postgres_source/contrib #ここにPL/Rのソースを配置
tar zxf plr-8.3.0.13.tar.gz
cd plr
export R_HOME=/Library/Frameworks/R.framework/Resources
make
make install

PL/Rのインストール完了。テスト用のDBを作成して言語を登録。

createdb r_test
cd /path-to-pgsql/contrib
psql r_test < plr.sql
psql -c "SELECT * FROM pg_language WHERE lanName = 'plr'" r_test #確認

これで導入完了。

Try working

PL/Rのドキュメントにある集約関数をテストしてみます。
(中央値を返す集約関数medianを作成)

create or replace function r_median(_float8) returns float as '
  median(arg1)
' language 'plr';
CREATE AGGREGATE median (
  sfunc = plr_array_accum,
  basetype = float8,
  stype = _float8,
  finalfunc = r_median
);

SELECT median(v)
FROM (values(1.0),(2.5),(5.7),(3.4),(-0.9)) AS t(v);
-- => select 2.5

集約関数はfloat8を配列に集約して最後にr_median(_float8)を呼び出し、
Rの関数medianを計算しています。

ポイントはデータ型の違い。
R言語はベクトル処理言語であり、データはベクトルで持ちます。
例えば、上記のmedianの計算は、Rでは下記のように行います。

x <- c(1.0, 2.5, 5.7, 3.4, -0.9) #ベクトルを作成してxに代入
median(x) # => [1] 2.5

postgresからRへの引数の受け渡しについては、
・スカラ　⇒　単一要素のベクトル（例外あり）
・一次元配列　⇒　複数要素のベクトル
・二次元配列　⇒　行列
・三次元配列　⇒　三次元配列
・三次元以上の配列　⇒　サポートせず
・複合型　⇒　データフレーム
となります。
参考：Passing Data Values

では最後に、統計解析の基礎として相関係数を計算する関数を作成してみます。
参考：R-Source

CREATE OR REPLACE FUNCTION correlation(_float8, _float8) RETURNS float8 AS '
 cor(arg1, arg2)
' LANGUAGE 'plr';

列xと列yの相関係数を計算する場合は下記で。

SELECT correlation(array_agg(x),array_agg(y))
FROM (values(0.7,1.9),(-1.6,0.8),(-0.2,1.1),(-1.2,0.1),(-0.1,-0.1)
　　　　　　,(3.4,4.4),(3.7,5.5),(0.8,1.6),(0.0,4.6),(2.0,3.4)) AS t(x,y);
-- => select 0.795102...

以上、簡単にさわってみました。
それほど敷居は高くないように感じますが、どういう用途に使ったものか．．．

Be continued
応用編に続く　．．．のか？

Next
明日はs87さんです。よろしくお願いします。

【PostgreSQL】2つの配列に共通する要素のインデックスを取得する関数

2011-09-30T20:44:00.001+09:00

やりたいことは、配列A{1,3,4,5,8,10,11,12}と配列B{1,2,5,11,13}から共通する要素（1,5,11）を探し、
配列Aの要素番号(1,4,7)を取得すること。（配列Aの要素はユニークである仮定）

配列Bが数値1つでよければ、contribにidx関数がある。

idx(int[], int item)
戻り値の型：int
説明：itemに一致する要素番号（存在しなければ0）
例：idx(array[11,22,33,22,11], 22)
結果：2

intarray
http://www.postgresql.jp/document/current/html/intarray.html

これを利用して関数を作成(sort()とuniq()もintarrayモジュールに含まれる)

CREATE OR REPLACE FUNCTION idx_array(_int4, _int4) RETURNS _int4 AS
'SELECT
    uniq(sort(array_agg(idx($1, t.v))))
FROM
    unnest($2) AS t(v)
WHERE
    idx($1, t.v) > 0'
LANGUAGE SQL IMMUTABLE STRICT;

SELECT idx_array(ARRAY[1,3,4,5,8,10,11,12], ARRAY[1,2,5,11,13])
結果：{1,4,7}

やさしいJavaメモ

2011-09-25T17:24:00.001+09:00

レッスン７　配列
・配列を宣言し、new演算子で配列を確保することができます。
・配列変数を使って、配列要素に値を代入することができます。
・{}内に値を指定して、配列を初期化することができます。
・.lengthをつけて、配列要素の数を知ることができます。
・配列変数には、別の配列変数を代入することができます。
・多次元配列を作成して扱うことができます。

レッスン８　クラスの基本
・クラスは、フィールドとメソッドをメンバとしてもちます。
・クラス宣言をもとにしてオブジェクトを作成することができます。
・オブジェクトを作成してメンバにアクセスすることができます。
・クラス内に変数を宣言してフィールドとすることができます。
・クラス内に一定の処理をまとめて、メソッドとして定義することができます。
・メソッドに引数を渡して処理させることができます。
・メソッドの呼び出し元は、戻り値を受けとることができます。

レッスン９　クラスの機能
・privateメンバには、クラスの外からアクセスすることはできません。
・publiメンバには、クラスの外からアクセスすることができます。
・カプセル化によって、誤りのおきにくいプログラムを作成することができます。
・メソッド名が同じで引数の型・数の異なる複数のメソッドをオーバーロードすることができます。
・コンストラクタは、オブジェクトを作成するときに呼び出されます。
・引数の型・数の異なる複数のコンストラクタをオーバーロードすることができます。
・個々のオブジェクトに関連づけられたメンバを、インスタンス変数・インスタンスメソッドと呼びます。
・クラスに関連づけられたメンバを、クラス変数・クラスメソッドと呼びます。

レッスン１０　クラスの利用
・クラスライブラリのクラスを使うと、コードを簡単に作成できます。
・クラス型の変数には、同じクラスの変数を代入することができます。
・クラス型の変数にnullを代入すると、その変数はオブジェクトをささなくなります。
・フィールドにクラス型の変数を使うことができます。
・メソッドの仮引数としてクラス型の変数を使うことができます。
・オブジェクトを配列で扱うことができます。

レッスン１１　新しいクラス
・スーパークラスからはサブクラスを拡張することができます。
・サブクラスは、スーパークラスのメンバを継承します。
・スーパークラスのprotectedメンバに、サブクラスからアクセスすることができます。
・スーパークラスと同じメソッド名・引数の型・数をもつメソッドをサブクラスで定義して、オーバーライドすることができます。
・スーパークラスを指定しないクラスは、Objectクラスのサブクラスとなります。

レッスン１２　インターフェイス
・抽象クラスを宣言することができます。
・抽象クラスは処理が定義されていない抽象メソッドをもちます。
・抽象クラスのオブジェクトを作成することはできません。
・インターフェイスを宣言してクラスで実装することができます。
・インターフェイスのフィールドは、定数となります。
・インターフェイスのメソッドは、処理を定義することができない抽象メソッドとなります。
・スーパーインターフェイスを拡張し、サブインターフェイスを宣言することができます。

レッスン１３　大きなプログラムの作成
・ファイルを分割してコンパイルすることができます。
・クラスをパッケージに含めるにはpackage文を使います。
・クラスを異なるパッケージから利用できるようにするには、publicを指定します。
・異なるパッケージのクラスを利用するには、「パッケージ名.クラス名」と記述します。
・異なるパッケージのクラスをimport文を使ってインポートすることができます。
・クラスライブラリのクラスは、パッケージ内に分類されています。
・同じパッケージのクラスをすべてインポートするには、import文で*を指定します。

レッスン１４　例外と入出力処理
・例外は、try、catch、finallyブロックを使って処理します。
・独自の例外クラスをつくるには、Throwableクラスのサブクラスを拡張します。
・例外を送出するにはthrow文を使います。
・例外を送出する可能性のあるメソッドにはthrowsをつけます。
・入出力を行うには、ストリームを利用します。
・コマンドライン引数を利用すると、プログラムに引数を渡すことができます。

レッスン１５　スレッド
・スレッドは、複数起動することができます。
・スレッドを起動するにはThreadクラスを拡張し、start()メソッドを呼び出します。
・スレッドの最初の処理として、run()メソッドが呼び出されます。
・スレッドを一時停止するには、sleepメソッドを呼び出します。
・スレッドの終了を待つには、join()メソッドを呼び出します。
・複数のスレッドが共有するフィールドなどを処理するときは、メソッドにsynchronizedを指定します。

レッスン１６　アプレット
・Webブラウザ上で動作するアプレットを作成することができます。
・paint()メソッドを定義して、画面に文字やグラフィカルな要素を表示できます。
・init()、start()、stop()、destroy()メソッドを定義して、Webブラウザの動作にあわせた処理を記述できます。
・ウィンドウ部品（AWT）をアプレット上で使うことができます。
・スレッドによるアニメーションをアプレット上で行うことができます。

やさしいCメモ

2011-09-17T17:11:00.007+09:00

レッスン７　配列
・配列を宣言して、各要素に値を代入できます。
・{}内に初期化子を指定して、配列を初期化することができます。
・初期化子がたりない場合は、たりない数だけ0が格納されます。
・文字列に置き換えられるマクロを定義することができます。
・多次元配列を作成して扱うことができます。
・文字列配列の末尾には¥0を格納します。
・文字列配列は、""を使った文字列を指定して初期化できます。
・文字列を操作するときは、最後が¥0であることを利用します。

レッスン８　関数
・一定の処理をまとめて関数として定義し、呼び出すことができます。
・関数の本体に引数を渡して処理させることができます。
・関数の本体から戻り値を受け取ることができます。
・かんたんな処理について、関数形式マクロを定義できます。
・変数の宣言位置によって、ローカル変数とグローバル変数があります。
・関数プロトタイプ宣言によって、関数の仕様をコンパイラに知らせることができます。
・ファイルを分割してコンパイルすることができます。
・ヘッダファイルには関数プロトタイプ宣言を記述します。
・C言語の開発環境には、標準ライブラリ関数が添付されています。

レッスン９　ポインタ
・アドレスは、メモリ上の位置を直接あらわします。
・ポインタは、特定のアドレスを格納する変数です。
・アドレス演算子（&）を使うと、ポインタがさしている変数の値を得ることができます。
・ポインタに関数参照演算子（*）を使うと、ポインタがさしている変数の値を得ることができます。
・引数は原則として値渡しで関数に渡されます。
・関数の引数にポインタを使うと、呼び出し元の実引数を変更することができます。
・仮引数にconstを指定すると、実引数を変更することができなくなります。

レッスン１０　配列・ポインタの応用
・配列名は、配列の先頭要素のアドレスをあらわします。
・配列を引数にもつ関数は、配列の先頭要素のアドレスを渡します。
・文字列関数は、""を使った文字列を指定して初期化できます。
・文字列は、配列またはポインタで扱うことができます。
・標準ライブラリの文字列操作関数を利用することができます。
・プログラムの実行時にメモリを確保することができます。
・関数ポインタによって、関数を呼び出すことができます。

レッスン１１　いろいろな型
・基本型以外に新しい型を作成することができます。
・構造体は、異なる型の値をまとめることができる型です。
・構造体のメンバにアクセスするには、ドット演算子（.）を使います。
・typedefを使って、独自の型名をつけることができます。
・構造体に同じ方の構造体を代入することができます。
・構造体にビットフィールドをもたせることができます。
・構造体のポインタからメンバにアクセスするには、アロー演算子（->）を用いると便利です。
・構造体の配列を作成することができます。
・共用体の各メンバは、同じメモリを共有します。
・列挙は、識別子の値を格納することができます。

レッスン１２　ファイルの入出力
・入出力機能を使うには、標準ライブラリを利用します。
・scanf()関数・printf()関数を使って、標準入出力との書式付き入出力ができます。
・gets()関数・puts()関数を使って、標準入出力との1行入出力ができます。

・getchar()関数・putchar()関数を使って、標準入出力との1文字入出力ができます。
・fscanf()関数・fprintf()関数を使って、ストリームとの書式付き入出力ができます。
・fgets()関数・fputs()関数を使って、ストリームとの1行入出力ができます。

・fgetc()関数・fputc()関数を使って、ストリームとの1文字入出力ができます。

・fopen()関数・fclose()関数を使って、ファイルのオープン・クローズができます。

・fread()関数・fwrite()関数を使って、指定したデータサイズの入出力ができます。

・fseek()関数を使って、ファイルポジションを移動できます。

・コマンドライン引数を利用すると、プログラムに文字列を渡すことができます。
・条件付きコンパイルを行うことができます。
・組み込みマクロを使うことができます。

「誰かがやらなくちゃいけない」

2011-03-31T19:03:00.000+09:00

明日からは社会人。大学生のときに印象に残った言葉の１つを記しておく。

大学・大学院の専攻に都市防災をテーマに扱う研究室がある。ざっくり言うと火災や地震に対応した都市づくりをどう進めるかが研究テーマだ。
自分はその研究室には所属しなかったが、その研究室の助教授と話をする機会があり、その時に聞いた言葉がずっと心のどこかでひっかかっていた。

大学４年生の夏、所属する研究室を選択する際、都市防災にするという選択肢は最初から自分にはなかった。
理由は、地味そうとか楽しくなさそうとか、そんな程度だった気がする。

都市防災に対するイメージはそんな風で、あまり魅力的な研究だとも思えなかったので、その助教授と話をしたときに聞いてみた。
「なぜ先生は都市防災をテーマに選んだのですか？」

この問いに助教授はこう答えた。
「誰かがやらなくちゃいけない」

この言葉を聞いたときはあまりピンとこなかった。そんなテーマの選び方は当時の自分にはあまり理解できなかった。
就職活動を経験することで少しずつ共感できるようになり、社会人になる前にブログに書こうと考えていたところ、3.11の震災が起きて、再度この言葉を反芻しているところだ。

明日から社会人になって、しばらくは興味・関心の赴くままに進もうと考えているが、いつかまたこの言葉を問い直すことになるのではないか、そんな気がしている。

恋愛観

2010-12-30T19:32:00.002+09:00

恋愛について学んだことをメモしとく。

恋は勘違いから始まる
これはあるツイッターの発言を呼んで納得した。

「似ているところに共感し、違うところに憧れを抱く、そんな恋の始まり。似ているところに嫌悪感を感じ、違うところをすれ違いと呼ぶ、それは、別れの始まり。価値観の相違もわかりあえないことも、始まりも終わりも同じこと。ただ違うのは心持ち…。」

愛するとは差別すること
差別っていうと物騒だけど、恋人とその他に区別するということ。

「二者間の恋愛関係とはその他への差別があってはじめて成立する」

「誰も差別しないとは誰も愛さないこと」

付き合うという言葉の定義
http://anond.hatelabo.jp/20100720013629

男性の方がこれらのことに無頓着な気がする。
たぶん恋愛って女性が主導することが多いんだろな。

【Perl】Twitterのお気に入りを全削除するスクリプト

2010-10-03T20:21:00.001+09:00

作成したスクリプト
（#Consumer key#や#Access Token#を書き換えて実行）
——————————————————————————————
#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use Net::Twitter;
my $twit = Net::Twitter->new(
   traits => [qw/API::REST OAuth WrapError/],
   consumer_key => '#Consumer key#',
   consumer_secret => '#Consumer secret#',
   ssl => 1,
);
$twit->access_token('#Access Token#');
$twit->access_token_secret('#Access Token Secret#');
while (1) {
   my $ref_favs = $twit->favorites; #最新のお気に入りを20件取得
   unless (@$ref_favs) { #お気に入りがない場合はループ脱出
   last;
   }
   foreach my $ref_fav (@$ref_favs) {
   $twit->destroy_favorite($$ref_fav{'id'}); #お気に入りを削除
   print $$ref_fav{'id'}, "\n"; #削除したツイートのIDを表示
   }
}
exit;
——————————————————————————————

準備
・Net::Twitterのインストール
・Twitterにアプリケーション登録
下記リンク参考
MacOS10.6.2(Snow Leopard)のPerlで Net::Twitterを動かす：FuruFuruのblog：So-net blog
http://furufuru.blog.so-net.ne.jp/2010-03-22
実用！ PerlでコマンドラインからTwitter投稿（OAuth対応） - perl-mongers.org
http://perl-mongers.org/2010/06/_perltwitteroauth.html

スクリプトの作成
Net::Twitterの説明を参考に作成
http://search.cpan.org/~mmims/Net-Twitter-3.13009/lib/Net/Twitter.pod
使用したメソッドはfavoritesとdestroy_favorite
・favorites
　最新のお気に入りを20件取得。戻り値はArrayRef。
・destroy_favorite
　お気に入りを解除。引数にツイートIDを指定。

書評：これからの「正義」の話をしよう

2010-08-31T23:46:00.006+09:00

タイトル：これからの「正義」の話をしよう　いまを行き延びるための哲学
出版年：2010年
著者：マイケル・サンデル
訳者：鬼澤忍
発行所：（株）早川書房

内容まとめ
この本の原題は「Justice: What's the Right Thing to Do?」であり、
正しい行いとは何か？を哲学者の理論や具体的論争を紹介しながら読者に問いかけてくる。

著者の主張を簡略化すると、
１．正義をめぐる議論には以下の３つの理念が存在する。
①幸福の最大化、②自由の尊重、③美徳の促進
２．①、②のみで正義を判断しようとするのは誤りで、③の議論を避けてはならない。

最も主張がまとめられている部分がp335~336である。

私にはこれは間違っていると思える。公正な社会は、ただ効用を最大化したり選択の自由を保証したりするだけでは、達成できない。公正な社会を達成するためには、善良な生活の意味をわれわれがともに考え、避けられない不一致を受け入れられる公共の文化をつくりださなくてはいけない。

所得、権力、機会などの分配の仕方を、それ一つですべて正当化できるような原理あるいは手続を、つい探したくなるものだ。そのような原理を発見できれば、善良な生活をめぐる議論で必ず生じる混乱や争いを避けられるだろう。

だが、そうした議論を避けるのは不可能だ。正義にはどうしても判断がかかわってくる。（中略）正義の問題には、名誉や美徳、誇りや承認について対立するさまざまな概念と密接に関係している。正義は、ものごとを分配する正しい方法にかかわるだけではない。ものごとを評価する正しい方法にもかかわるのだ。

感想
   美徳をめぐる議論がものごとを評価する正しい方法にかかわってくる、というのは重要な視点であると感じる。
   多くの人は判断の際に中立的な基準を望むであろうが、実際の自分の判断はしばしば感情的なものになりがちだ。だが、それがよくないからといって感情を全く排して客観的・合理的に判断することが本当に望ましいことなのかは疑問である。
   美徳を判断の基準にするというのは、感情的な議論を避けつつも排除できない人の感情を社会に反映させるということなのかもしれない。

目次
第１章：正しいことをする
第２章：最大幸福原理——功利主義
第３章：私は私のものか？——リバタリアニズム（新自由主義）
第４章：雇われ助っ人——市場と倫理
第５章：重要なのは動機——イマヌエル・カント
第６章：平等をめぐる議論——ジョン・ロールズ
第７章：アファーマティブ・アクションをめぐる論争
第８章：誰が何に値するか？——アリストテレス
第９章：たがいに負うべきものは何か？——忠誠のジレンマ
第１０章：正義と共通善

これから就職活動する後輩へ

2010-07-15T01:16:00.003+09:00

これから就職活動する人に参考になるであろう情報をまとめてみる。

序
最近、何度か就職活動についてのアドバイスを求められた。
大企業の選び方はどうすれば？と聞かれたが、自分はベンチャー就職なので正直分からない。

でも、仮に自分が大企業に就職する場合を想定して考えてみる。
大企業を選ぶ上で、最低限自分の生活が行き詰らないためには２種類の選択肢がある。

定年まで潰れないandリストラされない企業
その組織から離れても生きていける力がつく企業

１の選択肢については探すだけ無駄。これからの時代、公務員もリストラがないとは言い切れない。

それに、１の選択肢を探すような人が参加する組織は、将来経営が傾くと思う。

そうなると２の選択肢しかないが、その条件を満たす大企業を探すのも、難しいんじゃないか。

以降では自分が読んだ記事を紹介するので、それを参考に考えてみて欲しい。

若者を取り巻く現状

そもそも、大企業に入社すれば幸せになれる、なんて思ってる人がいたらそういう考えは捨てよう。

もしかしすると親は大企業を進めるかもしれないが、親世代とは時代背景が違う。

【社会】名無しの世代ですら、社⇄会を信頼していないという（今更過ぎる）話 | Busidea

スローガンを持って生きよう伊藤豊(スローガン社長)ブログ:親のために就職先を選ぶ間違い - livedoor Blog（ブログ）

就職氷河期　サイコー！ - Chikirinの日記

大企業の実態と課題

大企業といっても一括りにはできないが、一般論として参考記事を紹介する。

「日本型大企業」というシステム

会社の歯車になりたくない、とは多くの人が思うことかもしれない。

しかし、残念ながら日本型大企業に就職すれば、システムに組み込まれ歯車になるだろう。

そして、大企業はそんな日本型システムの見直しを必要とされている。

大きな会社との付き合い方 - GoTheDistance

日本人はなぜ市場競争が嫌いか～大竹文雄・大阪大学教授に聞く(上)｜辻広雅文　プリズム+one｜ダイヤモンド・オンライン

日本社会はなぜ「解雇規制緩和論」を受け入れようとしないのか～大竹文雄・大阪大学教授に聞く（下）｜辻広雅文　プリズム+one｜ダイヤモンド・オンライン

守る組織、守る人 - Chikirinの日記

日本では会社と社員が「密結合」であり、人材が「入れ替え可能」な「モジュール」になっていない - Zopeジャンキー日記

【正論】明暗分ける「人材流動性」の低さ　坂村健 (1/3ページ) - MSN産経ニュース

日本の経営者人材の枯渇

システムの見直しは、法規制の問題があり難しい。

そして、システムを作り変える経営者人材が日本には不足している。

「政府が方針を全部作らないと、自分たちは動けないんです」という日本でいいんでしょうか？：日経ビジネスオンライン

JAL問題で露呈した、日本の経営者人材の枯渇：日経ビジネスオンライン

「大企業には優秀な人材が多い」は本当か？

大企業の人材不足は経営者だけの話ではない。

ビジネスの基礎を作った人材は、既に独立・起業している場合も少なくない。

さらに、企業のミドルクラスの人材不足が指摘されることも多い。

特に自分が強調したいのは、日本の成長を牽引した製造業（主に自動車と半導体）では、

先人が築いた技術力は残っているものの、優秀な技術者は育っていないということだ。

スローガンを持って生きよう伊藤豊(スローガン社長)ブログ:人材輩出ラグ - livedoor Blog（ブログ）

スローガンを持って生きよう伊藤豊(スローガン社長)ブログ:人材輩出企業の条件について - livedoor Blog（ブログ）

フルスイングできないバブル管理職：日経ビジネスオンライン

ゆとり世代は「さとり世代」：日経ビジネスオンライン

優秀な技術者が「無能化」していく悲劇日本半導体が陥った「組織のジレンマ」とは　JBpress(日本ビジネスプレス)

トヨタに世界の潮流は見えているか【緊急提言】トヨタ再建への処方箋（9）　JBpress(日本ビジネスプレス)

トヨタの企画・開発者たちにぜひとも気づいてほしいことトヨタ再建への処方箋（10）　JBpress(日本ビジネスプレス)

目指すべき人材像

非常に厳しい時代であると言える。

そんな中、どういう人材が必要とされているのか。

日本の指導者を悩ます「従順」「妄信」　：日本経済新聞

Business Media 誠：ちきりんの“社会派”で行こう！：世の中に必要なヒトたち (1/2)

どのような会社に入るべきか/どのような事業を興すべきか - 人と組織と、fukui's blog

企業の人材育成

どの会社に入れば、どこでも通用する力が身につくのか。

大企業を選ぶ上では、人材育成法に気をつけた方が良い。

就職活動では人材育成を担当する人事と直接話せるので、積極的に質問してみるといいだろう。

「叱られて育った」世代は、どうすればイマドキ部下を上手に育てられるのか｜イマドキ職場のギャップ解消法｜ダイヤモンド・オンライン

「育てる」GE、「育つ」グーグルのウソ - 記者の眼：ITpro

タイム・コンサルタントの日誌から : わたしが新入社員の時に学んだこと

メッセージ

これから就職活動する人にアドバイスと社会人からのメッセージ記事を紹介

自己分析やコミュニケーション力を磨くより、本質を見極める力をつけよう

いろいろブログを読むと社会勉強になると思う。はてなブックマークで人気のものとか。

あと、以下に紹介する人のブログはよく読む。

@InsideCHIKIRIN、@joesakai、@fukui_dayo、@yutaslogan

人間万事塞翁が馬

就職活動がうまくいかなくても、幸せになれないわけじゃない。

志望企業に不採用だと辛いとは思う。

でも長い目で見ればうまくいかなかった人間の方がそこから奮起して成功することもある。

気をつけて欲しいのは、目先の内定を得るために自分に嘘をついて性根が腐ること。

最後に、社会人からのメッセージ

特に、最後の記事は是非読んでほしい。

甘ったれるな！中年：日経ビジネスオンライン

『社会では通用しないぞ』を信じてはいけない理由 - keitaro-news - 書評で学ぶ整理術

奇妙な国日本で、これから社会人になる人達へ：ASSIOMA：ITmedia オルタナティブ・ブログ

経営者の言葉（就活メモ）

2010-05-31T03:59:00.003+09:00

就職活動で印象に残ったベンチャー経営者の言葉をメモ

エクセレントカンパニーに優秀な人はいなかった

新卒で日本IBMに入社した人の言葉。

『エクセレントカンパニーは人がエクセレントなのではなく、仕事の仕組みがエクセレント。
社員が優秀じゃなくても仕事が回る仕組みがある。
あまり努力しなくても仕事ができるから、入社時は優秀な人も１年経てば平凡な人間になる。』

新卒は空のグラス

『学生が就職活動で自己分析をすると、自分の中身のなさに気づく。
でも何もないからこそ、これから新しいものを入れられる。
就職活動で大事なのは、空のグラスに何を注ぐのかを決めること。』

やりたいことをやらずに死ぬことが一番のリスク

『起業することのリスクについて、起業前にかなり考えた。
でも、やりたいことをやらずに老いていくことの方が余程リスクだと思った。』

乞食のような就職活動はするな

『新卒なんて入社後しばらくはお荷物。
君達が入社してすぐに良い給料をもらえるのは先人が豊かな社会を築いたから。
にもかかわらず、給料や福利厚生がどうこうと話すのは乞食のようなもの。
そんな就職活動を半年間も続ければ人間が腐る。』

仕事に「志」を持つ

ソーシャルベンチャーの経営者の言葉。

『ソーシャルベンチャーという言葉には違和感がある。
すべての仕事はなんらかの社会問題を解決することができる。
「志」を持って仕事に取り組むのなら「ソーシャルベンチャー」という肩書きはいらない。』

常識的な人間に市場価値はない

某有名ベンチャー企業の考え方：「良質な非常識」

良質な非常識を持つための３ステップ。

１．常識を理解する
２．理解したら疑う

３．代替案を出す

意思決定するには正しい情報を集めること

『経営で大切なことは、正しい情報から本質的な意思決定をすること。
また、営業とエンジニアのセクショナリズムが発生する理由は、
「価値観が違う」ことと、「持っている情報が違う」から。』

できるまでやれば成功する

内定先の社長の言葉。諦めない根性がすごい。

経営者の言葉をもっと聴きたいなら以下の参考リンクをどうぞ。

GOOD FIND 2011. 未来のビジネスリーダーのためのOBOG訪問・インタビュー
http://www.goodfind.jp/2011/obog/index.html

ITを活用して考えを練る方法

2010-05-03T19:48:00.004+09:00

個人的な実践方法をメモ

目的

インプットした情報のアウトプット
アイデアの熟成（メタ・ノート）

メタノート？

「思考の整理学」の著者、外山滋比古が思考の熟成に使用したノート方式

参考：思考を整理する「メタ・ノート」習慣を始めよう！

方法

情報収集：twitter、RSS、本・雑誌、メールマガジン、等
メモ：twitterのつぶやき・お気に入り、RSSのお気に入り、本・雑誌の付箋
ノート：Evernoteに記録
アウトプットとメタ・ノート：ブログに書く、Evernoteでノート編集

１．情報収集

　twitter：自分の興味に近い情報を発信してくれる人をフォロー

　RSS：ニュースサイトを中心に「まるごとRSS」で記事取得

　本・雑誌：時間に余裕があれば積極的に読みたい

　メールマガジン：日本経済新聞のニュースメール等

２．メモ

　twitter：気になったものはどんどんお気に入りに、たまにリツイート

　　　　　思いついたことをつぶやく

　RSS：見出しを見て気になったものは、軽く読んでお気に入りに登録

　本・雑誌：読みながら付箋をつけていく

３．ノート

　twitter：Evernoteにつぶやきやリンクのwebクリップを記録

　RSS：Evernoteにwebクリップ

　本・雑誌：付箋を参考に本の概要をEvernoteにメモ

４．アウトプットとメタ・ノート

　ブログ：このブログに考えをまとめる

　Evernote：ノートをメタ・ノート用のノートブックにコピーして編集

使用しているwebサービス

　twitter系：Hootsuite、Echofon(iPhone)

　RSS系：Googleリーダー、まるごとRSS、Gruml(Mac)、MobileRSS(iPhone)

　その他：Evernote、Googleブログ