芥川龍之介が「蜘蛛の糸」を発表して百年。高二の秋の文化祭,クラスの仮装行列のテーマが 蜘蛛の糸だった。お釈迦様の極楽タワーの竹を近所から切り出し,地獄の焔と煙の絵を描いた。犍陀多に続いて蜘蛛の糸(登山部の赤いザイル)に群がる地獄の亡者だったころ。
2023年12月17日日曜日
情報伝達活動の構造(2)
2023年12月16日土曜日
情報伝達活動の構造(1)
りんちゃんの「棒」は「—」や「|」の問題だった。そうすると答えが変わってくる。
頻度の高い漢字の平均画数が7画程度で,これを棒の数とします。児童・生徒・学生の間は1日100字書いたとして(PCなど除く)10年間≒3000日では,〜30万字程度漢字をかくことになるので,〜200万画くらいかな。1画5mmだとすれば,200万画は1000kmである。鉛筆1本で 50kmかけるらしいので,鉛筆20本あれば十分だ。ホントか,削りながらの場合は1000本くらいになりそうだ。ジェットストリームのSXR-07では替え芯1本で700mということだから,1400本なのか。
2023年12月15日金曜日
Duolingo
2023年12月14日木曜日
棒
10年に 1回 〜 10回3年に 1回 〜 30回1年に 1回 〜 100回年に 4回 〜 300回月に 1回 〜 1000回週に 1回 〜 4000回3日に 1回 〜 1万回1日に 1回 〜 3万回1日に 3回 〜 10万回
Q(私):日本人が一日に書く漢字の数は400字程度です。一生には,1000万字程度の漢字を書くことになるでしょう。このうち,「棒」という漢字を書く回数は何回程度だと推定されますか?A(Claude):はい、ご指摘の通り、日本人が一生のうちに書く漢字はおよそ1000万字とされています。このうち、「棒」という漢字が何回含まれるかを推定するため、次のように考えます。日本語の漢字使用頻度データによると、「棒」の出現頻度は0.0026%,1000万字の0.0026%は2600字。したがって、一生のうちに書く漢字1000万字のなかで、「棒」という漢字が含まれる頻度はおよそ2600回と推定されます。
2023年12月13日水曜日
Gemini
2023年12月12日火曜日
四角形
2023年12月11日月曜日
石川デジタルミュージアムネットワーク
2023年12月10日日曜日
PISA2022
2023年12月9日土曜日
三角形(3)
2023年12月8日金曜日
12月8日(Blogger 5周年)
全期間(5年間)6.61万回 = 36回/日過去12ヶ月間 1.98万回 = 54回/日過去6ヶ月間 1.38万回 = 77回/日過去3ヶ月間 0.45万回 = 50回/日過去1ヶ月間 0.18万回 = 60回/日
2023年12月7日木曜日
アンペールの法則(2)
2023年12月6日水曜日
アンペールの法則(1)
2023年12月5日火曜日
物体O
2023年12月4日月曜日
万博リング
2023年12月3日日曜日
球形キャパシタ
2023年12月2日土曜日
円軌道はむずかしい
g = 0.0098; R = 6350; τ = 30; τs = τ*27; τt = 250; p = 0.85;a = 0.0446; b = 0.1445 a; s = 45 Degree; T = 15400;fs[t_] := 0.3*ArcTan[r[t]*r'[t]/ h[t]]fr[t_, τ_] := a*Sin[s]*HeavisideTheta[τ - t] +b*Sin[fs[t]]*HeavisideTheta[t-τs-τ]*HeavisideTheta[τ+τs+τt-t]ft[t_, τ_] := a*Cos[s]*r[t]*HeavisideTheta[τ - t] +b*Cos[fs[t]]*r[t]*HeavisideTheta[t-τs-τ]* HeavisideTheta[τ+τs+τt-t]fm[t_, τ_] := -p/(τ - p*t)*HeavisideTheta[τ - t]sol = NDSolve[{r''[t] == -fm[t, τ]*r'[t]+h[t]^2/r[t]^3 -g R^2/r[t]^2 +fr[t, τ],r[0] == R, r'[0] == 0,h'[t] == -fm[t, τ]*h[t] + ft[t, τ],h[0] == 2930 + 0*Sqrt[g] R^(3/2)}, {r, h}, {t, 0, T}]f[t_] := r[t] /. sol[[1, 1]]d[t_] := h[t] /. sol[[1, 2]]Plot[{6350, f[t]}, {t, 0, T}]Plot[{f[t + 1] - f[t], d[t]*R/f[t]^2, d[t]/f[t]},{t, 0, T}, PlotRange -> {-5, 15}]
2023年12月1日金曜日
ai pin
2023年11月30日木曜日
OpenAI
はい、完全におっしゃるとおりです。失礼しました。訂正いたします。e = 2.718...log π = 1.1447...として、e × log π を正確に計算すると、2.718... × 1.1447... = 3.11...(小数点以下省略)となりますね。3.14ではありませんでした。計算をちゃんと行わずに短絡的に判断してしまい、ファクトとしても誤りがありました。このようなミスを重ねてしまい、大変申し訳ありません。基本的な数値の計算から正しく立ち返る必要があると反省いたしました。今後は肝に銘じ、確認を怠らぬようにいたします。ご指導本当にありがとうございました。
2023年11月29日水曜日
大小関係
2023年11月28日火曜日
妖星ゴラス
2023年11月27日月曜日
奥州安達原
妹背山婦女庭訓(2)からの続き
国立文楽劇場の11月文楽公演(第172回)は,第2部の奥州安達原を観た。第1部は双蝶々曲輪日記と面売り,第3部は冥途の飛脚という演目。
奥州安達原を調べてみると,10年前の2013年11月に観ている。今回に加えて,道行千里の岩田帯,一つ家の段,谷底の段が上演されていて,一つ家の段と谷底の段の安達ケ原の鬼婆がでてくる怖い話のところが印象に残った。記憶の中では袖萩祭文が安達ケ原で行われたような錯覚に陥っているが,そんなことはありません。
今回は,朱雀堤の段と環の宮明御殿の段(敷妙使者の段,矢の根の段,袖萩祭文の段,貞任物語の段)なので,舞台は京都なのだった。出語り床の真ん前の席で,三味線の手も太夫の汗もよく見え,太棹の強いバチさばきが体に伝わるのだが,舞台の下手の方が遠いので肝腎の袖萩祭文の動き(和生・勘次郎)がよくわからない。
今回は,芳穂太夫・錦糸組ががんばっていた。呂勢太夫・清治の袖萩祭文から錣太夫・宗助の貞任物語もなかなかよかった。ところが,ストーリーが追いきれないので,平傔仗直方がなぜ切腹するのかがいまいち納得できないまま物語が急展開していくのだった。
休日で,阪神タイガースとオリックスバッファローズの優勝記念パレードの日だった。天気も良くて,人出は多かったのだが,文楽劇場の第2部の入りは40%ぐらいだった。大丈夫かな。
2023年11月26日日曜日
万里鏡1号
・11月21日 18時11分 北朝鮮が「人工衛星」打ち上げを通報 22日から12月1日までに(北朝鮮)・11月21日 22時46分 Jアラート発令「ミサイル発射。ミサイル発射。北朝鮮からミサイルが発射されたものとみられます。建物の中、又は地下に避難して下さい。(対象都道府県:沖縄県)」(Jアラート)・11月21日 23時15分 Jアラート発令「ミサイル通過。ミサイル通過。先程のミサイルは22時55分頃、太平洋へ通過したものとみられます。避難の呼びかけを解除します。不審な物には決して近寄らず直ちに警察や消防などに連絡して下さい。(対象都道府県:沖縄県)」(Jアラート)・11月22日 1時22分 北朝鮮ミサイル発射沖縄・鹿児島の状況は(日本)・11月22日 8時21分 北朝鮮 “軍事偵察衛星の打ち上げ成功”と発表(北朝鮮)・11月22日 10時16分 北朝鮮発射 “地球周回軌道への衛星投入 確認されず”(日本)・11月22日 16時55分 北朝鮮発射 分離の3つ目 高度450キロまで上昇しレーダー消失(日本)・11月22日 20時58分 韓国軍“北朝鮮の軍事偵察衛星 軌道に進入” 正常に機能か分析(韓国)・11月23日 16時29分 韓国“北朝鮮 衛星打ち上げは成功 ロシアから技術支援”(韓国)・11月24日 11時39分 木原防衛相 “北朝鮮発射 何らかの物体 地球の周回軌道に”(日本)・11月25日 5時37分 米軍 北朝鮮の“衛星”に管理番号 地球の周回軌道進入と判断か(米国)
2023年11月25日土曜日
アマテラス粒子
2023年11月24日金曜日
ケプラー方程式
f[t_, e_] := FindRoot[u - e Sin[u] == 2 Pi t, {u, 0}]g1[a_, e_] :=Table[{a (Cos[u] - e), a Sqrt[1 - e^2] Sin[u]} /. f[k/52., e], {k, 1, 52}];gp1 = Graphics[{PointSize -> Large, Red, Point[g1[1, 0.2]]}];g2[a_, e_] :=Plot[{a Sqrt[1 - e^2] Sqrt[1 - (x/a + e)^2], -a Sqrt[1 - e^2] Sqrt[1 - (x/a + e)^2]}, {x, -a (1 + e), a (1 - e)},AspectRatio -> Automatic, PlotStyle -> Blue]gp2 = g2[1, 0.2];Show[gp2, gp1]
2023年11月23日木曜日
楕円軌道
2023年11月22日水曜日
添田唖蝉坊
2023年11月21日火曜日
東京節
2023年11月20日月曜日
チェレンコフ放射(2)
2023年11月19日日曜日
チェレンコフ放射(1)
2023年11月18日土曜日
三角形(2)
2023年11月17日金曜日
三角形(1)
2023年11月16日木曜日
相似形
2023年11月15日水曜日
忘れ物
2023年11月14日火曜日
宮腰
2023年11月13日月曜日
昼夜時間(3)
2023年11月12日日曜日
奈良の神社寺院
また,神道の系列別のベスト7は次のようになる。八王子神社も散歩でよく見かける。奈良市 396 12%五條市 238 7%宇陀市 229 7%橿原市 214 7%大和郡山市 193 6%桜井市 156 5%天理市 155 5%その他 1602 50%
春日系列 146 20%八幡系列 139 19%祇園系列 83 11%天神系列 81 11%八王子系列 39 5%伊勢系列 35 5%稲荷系列 24 3%その他 188 26%
浄土真宗本願寺派 424 24%浄土宗 318 18%融通念仏宗 205 11%高野山真言宗 164 9%真宗大谷派 100 6%曹洞宗 74 4%真宗興正派 67 4%その他 441 25%
2023年11月11日土曜日
融通念仏宗
2023年11月10日金曜日
昼夜時間(2)
In[1] = f[τ_] := ArcSin[Cos[τ]*Sin[-23.4/180*Pi]]In[2] = t[τ_, θ_] := 12 (1.0 - 2.0/Pi*ArcTan[(Tan[f[τ]]*Tan[θ])/Sqrt[1 - (Tan[f[τ]]*Tan[θ])^2]])In[3] = (12 - t[0, 34.58/180*Pi])/2Out[3] = -1.15705In[4] = g1 = Plot[t[τ, 34.58/180*Pi], {τ, 0, 2 Pi},PlotStyle -> {Blue}]In[5] = g2 = Plot[{12 + 2*1.15705 Cos[t]}, {t, 0, 2 Pi}, PlotStyle -> {Red}]In[6] = g3 = Plot[10*(t[τ, 34.58/180*Pi] - (12 + 2*1.15705 Cos[τ])) +12, {τ, 0, 2 Pi}, PlotStyle -> {Green}]In[7] =Show[{g1, g2, g3}]
グラフの縦軸は夜時間で,中心値が12時間になっている。横軸は1年を位相2πに換算したもので,冬至−春分−夏至−秋分−冬至に対応する。違いがわかりにくいが,青が今回の結果,赤が三角関数,緑が(青−赤)の10倍である。つまり,純粋な三角関数からの ズレは,たかだか10分程度ではあるが,少しモジュレーションがかかったような関数になっていた。