なので，Tweet-a-Program への投稿はやっておりません．やりたい気持ちもあるけど，Tweet-a-Program は常に動いているわけじゃなさそうでロスが多いんです．「せっかく送ったのに無視」っていうケースが何度もありました．もう少し向こうもこちらも安定したら再開しようと思います．
Pages
Categories
Tags
Related Sites
wordpress.org
Meta
Author Archives: Takashi
11/02-11/11 の現実逃避
Thursday, November 13, 2014
こんな感じです．たまに日付が飛んでいるのは先方がダウンしていたためです． [2014/11/02] Code submitted by @takashiyoshino #wolframlang pic.twitter.com/ZeOU2EfTKF — Tweet-a-Program (@wolframtap) November 1, 2014 [2014/11/03] Code submitted by @takashiyoshino #wolframlang pic.twitter.com/GwWT8mbpxG — Tweet-a-Program (@wolframtap) November 3, 2014 [2014/11/04] Code submitted by @takashiyoshino #wolframlang pic.twitter.com/orFC61xRU3 — Tweet-a-Program (@wolframtap) November 4, 2014 [2014/11/05] Code submitted by @takashiyoshino #wolframlang Source: http://t.co/Mcvw2WiLSs pic.twitter.com/5Tn1FBGYxF — Tweet-a-Program (@wolframtap) November 5, 2014 […]
遊びなんだけど…
Friday, October 31, 2014
Tweet-a-Program 氏（@wolframtap）に Mention で Mathematica のコード（Wolfram言語のプログラム？）をつぶやくと計算結果の画像を RT してくれるというシステムで遊んでみることにしました．ネタが続く限りつぶやき続けようと思います．昨日はライフゲーム（Game of Life）のグライダーを今日はオフラティスのランダムウォークをつぶやきました．暇があれば解説を書こうと思います．たぶん，書かないと思うけど…． Code submitted by @takashiyoshino #wolframlang pic.twitter.com/MgjsbpdyUB — Tweet-a-Program (@wolframtap) 2014, 10月 30 Code submitted by @takashiyoshino #wolframlang pic.twitter.com/z0UNpy7OdT — Tweet-a-Program (@wolframtap) 2014, 10月 30
Geometrical Toys in China （中国の幾何学おもちゃ）
Tuesday, July 15, 2014
前からほしかった孔明鎖と呼ばれているおもちゃです．やっと Amazon のマーケットプレイスで発見しました．中国から直接送られてきたらしいです．箱を開けたとたんに揮発性薬品の臭いがしたのが少し心配ですが…． These toys were played in ancient China. They were said to be invented by Zhuge Liang.
Basic Data of 4D regular polytopes
Thursday, July 3, 2014
I prepared the Mathematica files and CVS files which included the basic data of 4D polytopes. The zipped file contains 6 files which correspond to 6 regular polytopes: 5 cells, 8 cells, 16 cells, 24 cells, 120 cells, and 600cells. Each file consists of 6 basic properties as follows: Locations of vertices of the polytope […]
4次元正多胞体の基本データ（Mathematica & CSV）
Thursday, July 3, 2014
4次元正多胞体の基本データをまとめた Mathematica のファイルおよび CSV ファイルを公開します．6種類の正多胞体（5, 8, 16, 24, 120, 600）について，以下の6種類のデータが保存されています． 頂点の位置：4次元ベクトルを頂点数だけ並べたもの． 辺をつくる頂点の対：１対（つまり２個）の頂点番号を辺の数だけ並べたもの． それぞれの頂点に隣接する頂点の番号：隣接する頂点番号のリストを頂点の数だけ並べたもの． 面をつくる頂点の番号：面を構成する頂点の頂点番号のリストを面の数だけ並べたもの． 隣接する面の番号：隣接する面の面番号リストを面の数だけ並べたもの． 胞を作る面の番号：胞を作る面の面番号リストを胞の数だけ並べたもの． データは多胞体ごとに別のファイルです．正n胞体についてのデータは “f(n).m” というファイル名になります．(n) には数字が入ります．例えば，正5胞体ならデータファイルは “f5.m” ですし，正120胞体ならデータファイルは “f120.m” です．このファイルが “~/tmp/” というフォルダにあるとき，以下のように使用することができます．例えば，「正24胞体を作る24個の胞（立体）が何番目の多角形を用いて作られているのか」は以下のようにして得られます． With[{n = 24, dir = “~/tmp/”}, Module[{vers, edgs, neis, faces, fneis, cells}, {vers, edgs, neis, faces, fneis, cells} = Get[dir <> “f” <> ToString[n] <> “.m”]; cells ] ] […]
学会発表してきました
Tuesday, June 17, 2014
2014/06/13 に迷路の話を 06/15 に WORLDEYE の話を第77回形の科学シンポジウムで発表してきました（前者は講演，後者は展示）．どちらの話もこれで終わりになるかな？ 迷路の話についてはいろいろ考えたけど，現在の私の立場は「粘菌の探索をもとにしたアルゴリズムを模索することには意義があるが，知性の有無についてはそれほど重要なこととは思えない」という感じです．粘菌の知性について論じること自体は「石を投げる」という意味で価値があるとは思います． WORLDEYE については，開発者がもっと情報公開を行うべきだと考えています．できれば私はもっと高解像度な高精度な全球面版がほしい． 発表用に作成した新しい画像を添付します．説明は省略します．
迷路の中の流体流れ
Wednesday, January 29, 2014
迷路の中は流体で満たされていて，初期状態でその圧力は0としましょう．赤で示した入口の圧力を常に100に，出口の圧力を常に0にして，入口と出口の圧力差が常に 100になるようにします．そして，圧力についてのラプラス方程式の数値解を求めます．左の図がその結果を図示したものです．圧力100が白，圧力0が黒で，グレースケールで迷路内の圧力分布を表示しています．右の図は隣のマスとの差の（圧力勾配）絶対値の最大値を表しています．差の絶対値が最も大きいところが白，差がゼロであるところを黒として，グレースケールで圧力勾配の分布を示しています．圧力勾配は流体の流れる方向に相当しています．右の図は迷路の解をたどって流体が流れていることを示しています．つまり，流体は迷路の答えを得たことになります．Mathematica で２時間ぐらいコーディングしたらできちゃいました．夏ぐらいからやろうと思っていたものでした．早くやればいいのに，ダラダラしちゃって…． 周囲の情報で全体が変わっていく．創発ってこんな感じのことなのではないかと思っています（違うのかな？） ．
学研ワールドアイを入手しました
Monday, January 6, 2014
球面上のパターン形成をプレゼンテーションするのにピッタリなおもちゃ「学研ワールドアイ」（学研ワールドアイのページ）を入手しました．同梱された USB メモリに入っているデータだけではなく，自分で作ったデータも表示できるようです． I got a toy “World Eye” which is useful for presentations of pattern formation on spherical surface. This toy can project the data made by users. そこで，自分でもデータを作ってみようと思いました．しかし，わかっていることは少なくて，画像サイズは640×480で実際には中央の480×480に内接する円内部の画像のみが投影されることぐらいです．そこで，自分で試してみることにしました． So I tried to construct my data and project them using this toy. But information is few. ステレオ投影の理論は単純です．ウィキペディアに解説があります（ウィキペディア「ステレオ投影」）．私はz軸を逆に取っているので，(x, y) を 1/(1+z) 倍した図形を作って，うまく映るのかを確かめてみました． At first, […]