|
xy <- scan( "bar.txt", list( x = 1, y0 = 1, y1 = 1 ) ) par( fig = c( 0.25, 0.75, 0.0, 1.0 ) ) plot( xy$x, xy$y0, ylim = range( xy$y0 ), type = "h", lty = 1, col = "red", lwd = 20, xlab = "x", ylab = "y", asp = 1 ) par( new = TRUE ) plot( xy$x, xy$y1, xlim = range( 0, 0, xy$x ), ylim = range( xy$y0 ), type = "h", lty = 1, col = "blue", lwd = 20, axes = FALSE, xlab = "", ylab = "", asp = 1 ) title( main="Sample Barplot", font.main=3 ) |
[Freecell]
[1800 円本箱]
[3 分弁当]
[浜松町闇ルーター]
違和感を感じられるのはまったく当然のことです．なぜかというと，「常識的」 と「生態学者」は結びつかないからです． ・無欲な政治家 ・紳士的な痴漢 ・誠実な久保さん これらがヘンであるように，「常識的生態学者」も狂った表現といえるでしょ う．「生態学者」の必要条件 (必要十分ではありませんが) として「常識的で ないこと」が挙げられるからです．そういう変てこな標語をヒネりだしたのが ○さんだか×△さんだか知りませんが，誰であれ常識的でないのは確かだと断 言してよいでしょう．
[弁当と魔法瓶]
From: IWAMURO Motonori <iwa@mmp.fujitsu.co.jp>
Newsgroups: fj.comp.lang.perl
Date: 26 Jul 2000 13:36:31 +0900
Message-ID: <t83dkxse28.fsf@elhazard.inet.mmp.fujitsu.co.jp>
(略)
(重複なしの)集合を扱う場合、私はハッシュを使ってます。こんな感じ。
-----------------------------------------------------------
@a{1, 2, 3, 4, 5} = ();
@b{2, 4, 6, 8, 10} = ();
@c{grep {exists($a{$_})} keys %b} = ();
%d = (%a, %b);
print "AND: ", join(", ", sort {$a <=> $b} keys %c), "\n";
print " OR: ", join(", ", sort {$a <=> $b} keys %d), "\n";
-----------------------------------------------------------
AND: 2, 4
OR: 1, 2, 3, 4, 5, 6, 8, 10
-----------------------------------------------------------
(略)
From: "K.Takaoka" <saepro@din.or.jp>
Newsgroups: fj.comp.lang.perl
Date: Wed, 26 Jul 2000 23:40:20 +0900
Message-ID: <397EF854.EC50AD24@din.or.jp>
(略)
他では出てない方法を挙げておこう。
use Set::Scalar;
@c = (Set::Scalar->new(@a) * Set::Scalar->new(@b))->members;
(略)
[浜松町からみた TV 塔]
USAGE: convNumber.pl filename [options] OPTIONS: --grouping key (single, default: NONE) KEY: site mother --output key(s) (default: ALL) KEY: total Number of total seeds srvvl Number of srvvlival seeds intrd Number of introduced seeds preyed Number of preyed seeds dead Number of dead but NOT-preyed seeds missing Number of missing seeds ground Number of ground seeds larder Number of larder seeds scatter Number of scattered seeds 1_cache Counter for (intrd -> cache nwcache Counter for (ground -> cache) recache Counter for (cache -> cache) recover Counter for (cache -> ground) 1_cch_l Counter for (intrd -> larder) nwcch_l Counter for (ground -> larder) recch_l Counter for (cache -> larder) recvr_l Counter for (larder -> ground) 1_cch_s Counter for (intrd -> scatter) nwcch_s Counter for (ground -> scatter) recch_s Counter for (cache -> scatter) recvr_s Counter for (scatter -> ground)
[古マンション 6F のアサガオ]
[ガッシャブルム]
[椅子のある本屋]
[関東地図]