受賞作が決定しました ファミ通文庫×カクヨム「僕とキミの15センチ」短編小説コンテストは526作品のご応募をいただき、 選考の結果、100作品が最終選考に進みました。 最終選考対象作品は、株式会社KADOKAWA ファミ通文庫編集部が選考いたしました。 総評 ご投稿いただいた皆様、ならびに読者選考にご参加いただいた皆様に、改めて深く御礼を申し上げます。 今回のコンテストでは、“15センチ”と “男女”の二つのお題が入っていれば、どんな物語でもOKというテーマで募集させていただきましたが、このテーマ――とくに“15センチ”というお題は、ショートストーリーとはいえちょっと扱いが難しくなりすぎってしまったのでは、と編集部では危惧しておりました。 しかし、いざ蓋を開けてみると予想をはるかに超える数のご応募をいただき驚きました。しかも応募作は、いずれも趣向を凝らした内容になっていて、選考も大変楽しい

進捗ツライ。 こぞってR でのじゃんけん関数が作られる。 ここで、R のベクトルを用いて条件分岐を作っている。 R novice としてはグー、チョキ、パーの自分/相手の出す3*3=9 通りをすべて出し尽くせば、やりたいことはなんとかできる。というわけで、outer 関数を使えばこれはできる。 ここで、9通りの手の組み合わせで、勝敗を確定したい。このとき、グー、チョキ、パーと勝ち、負け、引き分けのパターンは となる。これをいい感じに一発で書きたい。 というのも、 みたいなベクトルがあるときに、全く同じように みたいな行列を作りたい、という場面は、たぶんある。 こういうときにベタに書いておくのもいいが、なんか一発でかっこよく書きたい。 というわけで悩んで見つけたのが、これ。 GCP <- c("Gu", "Chi", "Pa") M <- outer(10*(1:3), 1:3, "-")

タイトルのまんまです。メモ。 きっかけ ファイルを自動的に作成する関数を準備したり，あるいはそんな関数を含むパッケージを作っていると，「作った後にそのまま開いて即編集モードにいきたいのに…」とよく感じます。でもView()だと編集モートにはなりません。そこで調べてみました。 utils::file.edit()関数 Rに標準で組み込まれているutilsパッケージには，file.edit()関数があります。これを利用するとそのシステムに依存したエディタが開くようになります。詳細は?file.editで確認してください。 例えば，workind directoryにkosaki.Rというファイルがあるとします。以下のコマンドを実行すると，その環境(システム)でひも付けらているエディタでそのファイルが開かれます: 私のUbuntuのTerminal上で起動させたRで実行した場合，vimでこのファ

顧問をしている運動部の女子生徒に全裸になることを強要したり、セクハラ発言を繰り返したりしたとして、堺市教育委員会は２９日、市立学校の男性教諭（５６）を懲戒免職処分にし、発表した。教諭は「わいせつ目的ではなく、指導が高じた」と釈明しているという。 市教委によると、男性教諭は７日、前日の試合で敗れた女子生徒を呼び出し、壁を隔てた隣室から「裸になるぐらいの覚悟で頑張れ」「服を脱げ」と繰り返し強要。女子生徒はやむを得ず全裸になったという。生徒が服を着ることを許した後も、抱き寄せたり、背後から抱きつかせたりし、「成人したら先生とＨしような」などと発言したという。女子生徒が母親に相談して発覚した。男性教諭は「精神面を鍛えるためだった。裸になった姿は見ていない」と説明しているという。 市教委によると、男性教諭は１９９０年から顧問を務めていた。部員への聞き取りによると、男性教諭は普段から他の生徒に対しても

受動喫煙の防止策として、室内全面禁煙を目指す厚労省側とそれに反発する自民たばこ議連が争っています。本件に関しTwitter上でも、なかなか面白いディスカッションがおきています。 室内禁煙による受動喫煙対策は「科学的根拠（エビデンス）」に基づくものであり、国際的なスタンダードとなっているため実施すべきであるとする（私自身を含めた）公衆衛生・医療関係者らの主張に対して、経済学者・統計学者の方々から辛辣なご批判が届いています。 指摘されている内容を読んでみると、たしかに言っていることに一理ある。というか指摘はおおむね”正しい”のです。やはり経済学者はデータ分析に厳しい。とても素晴らしいことだと思いますし、私も彼らを尊敬し、そのようになりたいと日々思って勉強しています。しかし今回の件に関する批判はごもっともとして、あたかも「室内禁煙は支持するデータは全くのデタラメで信用ならん。やはり禁煙なんてすべ