Amazonでアプリを個人開発しています

Amazonでアプリを個人開発しています

ホームピグアメブロ

芸能人ブログ人気ブログ

前ページ
次ページ

06Oct
- R:中心極限定理による標準正規乱数の生成法
  本日は、オープンソースの統計解析ソフトであるRを用いて中心極限定理による標準正規乱数の生成法を解説したいと思います。一様乱数を１２個生成しそれを足し６を引くと標準正規乱数になります。Rで動くプログラムは下記のようになります。-----------------------set.seed(123)x_median<- replicate(10000, sum(runif(12)) - 6)x_median <- x_median[x_median < 5 & x_median > -5]x_vals <- seq(-5, 5, length.out = 500)y_vals <- dnorm(x_vals)breaks_normal <- seq(min(x_median) - 0.1, max(x_median) + 0.1, length.out = 50)hist(x_median, breaks = breaks_normal, freq = FALSE, # 縦軸を確率密度にする col = rgb(1, 0, 0, 0.5), # 赤（透過） xlim = c(-5, 5), ylim = c(0,0.6), main = "中心極限定理による標準正規分布と理論曲線", xlab = "統計量", ylab = "密度")lines(x_vals, y_vals, col = "blue", lwd = 2)legend("topright", legend = c("理論曲線 (数式)", "シミュレーション中央値"), col = c("blue", rgb(1, 0, 0, 0.5)), lwd = 2)------------------となります。テキストエディタなどに貼り付けてRにコピーして下さい。Rのバージョンは4.4.1です。Rで作成したグラフは綺麗に近似しました。参考にしてください。書籍の紹介です。三笠宮―昭和天皇末弟の近現代史 (中公新書)Amazon（アマゾン）三笠宮―昭和天皇末弟の近現代史 (中公新書 2919)舟橋正真 (著)本書は、昭和天皇の末弟である三笠宮さまの生誕から2016年に100歳で亡くなるまでの生涯を描いた一冊です。後半の戦後以降の記述は大分駆け足になりますが、3人の息子に先立たれるなど、その波乱に満ちた人生の輪郭が丁寧に描写されています。特に興味深いのは戦前の動向です。青年将校による「二二六事件」の際、三笠宮さま（当時は澄宮）を巡って流れた様々な噂話も、本書で明かされる詳細な経歴や時代背景を重ね合わせて見ると、単なる流言飛語として片付けるのは早計であると感じさせられます。激動の昭和・平成を皇族として、そして一人の歴史学者としてどう生き抜いたのか。謎多きその素顔と、近代皇室の歩みを捉え直すための一級の入門書と言えます。ゼロから学ぶ量子力学Amazon（アマゾン）ゼロから学ぶ量子力学竹内薫 (著)日本人の著者による「行列」を用いた量子力学の解説を期待して本書を手に取りましたが、実際にはシュレディンガー方程式（微分方程式）の立場からの記述が中心でした。「ゼロから学ぶ」という表題通り、初心者向けの入門書であるため、発展的な内容や高度な数理的記述は含まれていません。マトリクス（行列）力学のディープな展開を期待する人には物足りないかもしれませんが、数式に苦手意識があり、まずは量子力学の全体像を文字通り「ゼロから」概観したいという入門者にとっては、非常に親切で読み進めやすい一冊と言えます。工科系量子力学Amazon（アマゾン）工科系量子力学椎木一夫 (著)本書は、工学系学生向けに量子力学を「計算できる形」に落とし込むことを目的とした教科書であり、Dirac式の抽象性と、微分方程式の具体計算のしやすさを巧みに橋渡しする構成が特徴的である。量子力学の二大表記法を自然に接続し、抽象的な状態ベクトルの世界と、工学的応用に必要な具体的な波動関数計算を両立させている点が評価できる。本日もご訪問頂きありがとうございます。以上です！
02Oct
- Python:中心極限定理による標準正規乱数の生成法
  本日は、オープンソースのAIソフトであるPythonを用いて中心極限定理による標準正規乱数の生成法を解説したいと思います。一様乱数を１２個生成しそれを足し６を引くと標準正規乱数になります。Pythonで動くプログラムは下記のようになります。-----------------------import numpy as npimport matplotlib.pyplot as pltfrom scipy.stats import normplt.rcParams['font.family'] = 'MS Gothic'np.random.seed(123)x_median = np.array([np.sum(np.random.rand(12)) - 6 for _ in range(10000)])x_median = x_median[(x_median < 5) & (x_median > -5)]x_vals = np.linspace(-5, 5, 500)y_vals = norm.pdf(x_vals)breaks_normal = np.linspace(np.min(x_median) - 0.1, np.max(x_median) + 0.1, 50)plt.figure(figsize=(8, 6))plt.hist(x_median, bins=breaks_normal, density=True, # 縦軸を確率密度にする (Rの freq=FALSE と同等) color=(1, 0, 0, 0.5), # 赤（透過率 0.5） edgecolor='white', # バーの境界線（見やすさのため追加） label='シミュレーション中央値') # 凡例用ラベルplt.plot(x_vals, y_vals, color='blue', linewidth=2, label='理論曲線 (数式)')plt.xlim(-5, 5)plt.ylim(0, 0.6)plt.title('中心極限定理による標準正規分布と理論曲線')plt.xlabel('統計量')plt.ylabel('密度')# 凡例の表示（右上）plt.legend(loc='upper right')# グラフを表示plt.show()------------となります。テキストエディタなどに貼り付けて保存し、そのファイルをコマンドプロンプトなどで実行してください。Pythonで作成したグラフは綺麗に近似しました。参考にしてください。書籍の紹介です。三笠宮―昭和天皇末弟の近現代史 (中公新書)Amazon（アマゾン）三笠宮―昭和天皇末弟の近現代史 (中公新書 2919)舟橋正真 (著)本書は、昭和天皇の末弟である三笠宮さまの生誕から2016年に100歳で亡くなるまでの生涯を描いた一冊です。後半の戦後以降の記述は大分駆け足になりますが、3人の息子に先立たれるなど、その波乱に満ちた人生の輪郭が丁寧に描写されています。特に興味深いのは戦前の動向です。青年将校による「二二六事件」の際、三笠宮さま（当時は澄宮）を巡って流れた様々な噂話も、本書で明かされる詳細な経歴や時代背景を重ね合わせて見ると、単なる流言飛語として片付けるのは早計であると感じさせられます。激動の昭和・平成を皇族として、そして一人の歴史学者としてどう生き抜いたのか。謎多きその素顔と、近代皇室の歩みを捉え直すための一級の入門書と言えます。ゼロから学ぶ量子力学Amazon（アマゾン）ゼロから学ぶ量子力学竹内薫 (著)日本人の著者による「行列」を用いた量子力学の解説を期待して本書を手に取りましたが、実際にはシュレディンガー方程式（微分方程式）の立場からの記述が中心でした。「ゼロから学ぶ」という表題通り、初心者向けの入門書であるため、発展的な内容や高度な数理的記述は含まれていません。マトリクス（行列）力学のディープな展開を期待する人には物足りないかもしれませんが、数式に苦手意識があり、まずは量子力学の全体像を文字通り「ゼロから」概観したいという入門者にとっては、非常に親切で読み進めやすい一冊と言えます。工科系量子力学Amazon（アマゾン）工科系量子力学椎木一夫 (著)本書は、工学系学生向けに量子力学を「計算できる形」に落とし込むことを目的とした教科書であり、Dirac式の抽象性と、微分方程式の具体計算のしやすさを巧みに橋渡しする構成が特徴的である。量子力学の二大表記法を自然に接続し、抽象的な状態ベクトルの世界と、工学的応用に必要な具体的な波動関数計算を両立させている点が評価できる。本日もご訪問頂きありがとうございます。以上です！
01Oct
- LibreOffice Calc:中心極限定理による標準正規乱数の生成法
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて中心極限定理による標準正規乱数の生成法を解説したいと思います。一様乱数を１２個生成しそれを足し６を引くと標準正規乱数になります。LibreOffice Calcで動くマクロは下記のようになります。-----------------------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub Macro1() Dim oDoc As Object Dim oSheet As Object Dim oFunctionAccess As Object Dim a(100) As Double Dim n As Long Dim i As Long, j As Long, m As Long Dim temp As Double Dim norm_rnd As Double Dim oArgs(0) As Variant ' Calcのシートと関数呼び出しの準備 oDoc = ThisComponent oSheet = oDoc.Sheets(0) ' 1番目のシートを取得 oFunctionAccess = CreateUnoService("com.sun.star.sheet.FunctionAccess") ' 乱数初期化 Randomize n = 12 'サンプル数 For m = 1 To 10000 '--------------------------------------- ' データ生成 '--------------------------------------- norm_rnd=0 For i = 1 To n norm_rnd = Rnd()+norm_rnd Next i norm_rnd = norm_rnd-6 oSheet.getCellByPosition(0, m - 1).Value = norm_rnd Next m MsgBox "処理が完了しました。"End Sub------------テキストエディタなどに貼り付けて、Calcのエディタにコピーして下さい。実行するとA列に10000個、標準正規乱数を生成します。乱数を検証するためにシートに式を組みました。セルI2は下限値です。セルI3=I2+0.5でI22までコピーします。セルF2=ROUND(I2-0.25,3)でF22までコピーします。セルG2:G22を選択して=FREQUENCY(A:A,I2:I22)と入力しCtrl+Shift+Enterを押します。乱数の個数をカウントしています。セルH2=NORM.S.DIST(F2,0)*10000*0.5でH22までコピーします。乱数の理論値になります。セルF2:I22は度数分布表になっていてこれをグラフにすると綺麗に近似しました。参考にしてください。書籍の紹介です。三笠宮―昭和天皇末弟の近現代史 (中公新書)Amazon（アマゾン）三笠宮―昭和天皇末弟の近現代史 (中公新書 2919)舟橋正真 (著)本書は、昭和天皇の末弟である三笠宮さまの生誕から2016年に100歳で亡くなるまでの生涯を描いた一冊です。後半の戦後以降の記述は大分駆け足になりますが、3人の息子に先立たれるなど、その波乱に満ちた人生の輪郭が丁寧に描写されています。特に興味深いのは戦前の動向です。青年将校による「二二六事件」の際、三笠宮さま（当時は澄宮）を巡って流れた様々な噂話も、本書で明かされる詳細な経歴や時代背景を重ね合わせて見ると、単なる流言飛語として片付けるのは早計であると感じさせられます。激動の昭和・平成を皇族として、そして一人の歴史学者としてどう生き抜いたのか。謎多きその素顔と、近代皇室の歩みを捉え直すための一級の入門書と言えます。ゼロから学ぶ量子力学Amazon（アマゾン）ゼロから学ぶ量子力学竹内薫 (著)日本人の著者による「行列」を用いた量子力学の解説を期待して本書を手に取りましたが、実際にはシュレディンガー方程式（微分方程式）の立場からの記述が中心でした。「ゼロから学ぶ」という表題通り、初心者向けの入門書であるため、発展的な内容や高度な数理的記述は含まれていません。マトリクス（行列）力学のディープな展開を期待する人には物足りないかもしれませんが、数式に苦手意識があり、まずは量子力学の全体像を文字通り「ゼロから」概観したいという入門者にとっては、非常に親切で読み進めやすい一冊と言えます。工科系量子力学Amazon（アマゾン）工科系量子力学椎木一夫 (著)本書は、工学系学生向けに量子力学を「計算できる形」に落とし込むことを目的とした教科書であり、Dirac式の抽象性と、微分方程式の具体計算のしやすさを巧みに橋渡しする構成が特徴的である。量子力学の二大表記法を自然に接続し、抽象的な状態ベクトルの世界と、工学的応用に必要な具体的な波動関数計算を両立させている点が評価できる。本日もご訪問頂きありがとうございます。以上です！
30Sep
- Python:サンプルが偶数個の中央値の分布を検証する
  本日は、オープンソースのAIソフトであるPythonを用いてサンプル数が偶数個の中央値の分布を検証したい。中央値（メディアン）とは、データを小さい順（または大きい順）に並べたときに、ちょうど真ん中にくる値のことです。グラフを描くだけだが、Pythonで検証用のプログラムを組みたい。１０個の標準正規分布による乱数の中央値と理論値のグラフを作るPythonのプログラムは-------------------------import mathimport matplotlib.pyplot as pltimport numpy as npfrom scipy.special import gammalnfrom scipy.stats import normnp.random.seed(123)plt.rcParams["font.family"] = "MS Gothic"x_median = np.array([np.median(np.random.normal(0, 1, 10)) for _ in range(10000)])x_median = x_median[(x_median < 2) & (x_median > -2)]D2 = 10 # サンプル数D4 = 5.5 # インデックスD5 = gammaln(D2) - gammaln(D2 - D4 + 1) - gammaln(D4) # 係数D5 = math.exp(D5)x_vals = np.linspace(-5, 5, 500)y_vals = ( D2 * D5 * (norm.cdf(x_vals) ** (D2 - D4)) * ((1 - norm.cdf(x_vals)) ** (D4 - 1)) * norm.pdf(x_vals))plt.figure(figsize=(8, 6))plt.hist( x_median, bins=50, density=True, color=(1, 0, 0, 0.5), edgecolor="black", alpha=0.5, label="シミュレーション中央値",)plt.plot(x_vals, y_vals, color="blue", linewidth=2, label="理論曲線 (数式)")plt.xlim(-2, 2)plt.ylim(0, 1.5)plt.title( "標準正規分布の中央値分布と理論曲線", fontsize=14)plt.xlabel("統計量")plt.ylabel("密度")plt.legend(loc="upper right")plt.grid(axis="y", linestyle="--", alpha=0.7)# グラフを表示plt.show()----となります。テキストエディタなどに貼り付けて保存し、そのファイルをコマンドプロンプトなどで実行してください。Pythonで作成したグラフは綺麗に近似しました。参考にしてください。書籍の紹介です。三笠宮―昭和天皇末弟の近現代史 (中公新書)Amazon（アマゾン）三笠宮―昭和天皇末弟の近現代史 (中公新書 2919)舟橋正真 (著)本書は、昭和天皇の末弟である三笠宮さまの生誕から2016年に100歳で亡くなるまでの生涯を描いた一冊です。後半の戦後以降の記述は大分駆け足になりますが、3人の息子に先立たれるなど、その波乱に満ちた人生の輪郭が丁寧に描写されています。特に興味深いのは戦前の動向です。青年将校による「二二六事件」の際、三笠宮さま（当時は澄宮）を巡って流れた様々な噂話も、本書で明かされる詳細な経歴や時代背景を重ね合わせて見ると、単なる流言飛語として片付けるのは早計であると感じさせられます。激動の昭和・平成を皇族として、そして一人の歴史学者としてどう生き抜いたのか。謎多きその素顔と、近代皇室の歩みを捉え直すための一級の入門書と言えます。ゼロから学ぶ量子力学Amazon（アマゾン）ゼロから学ぶ量子力学竹内薫 (著)日本人の著者による「行列」を用いた量子力学の解説を期待して本書を手に取りましたが、実際にはシュレディンガー方程式（微分方程式）の立場からの記述が中心でした。「ゼロから学ぶ」という表題通り、初心者向けの入門書であるため、発展的な内容や高度な数理的記述は含まれていません。マトリクス（行列）力学のディープな展開を期待する人には物足りないかもしれませんが、数式に苦手意識があり、まずは量子力学の全体像を文字通り「ゼロから」概観したいという入門者にとっては、非常に親切で読み進めやすい一冊と言えます。工科系量子力学Amazon（アマゾン）工科系量子力学椎木一夫 (著)本書は、工学系学生向けに量子力学を「計算できる形」に落とし込むことを目的とした教科書であり、Dirac式の抽象性と、微分方程式の具体計算のしやすさを巧みに橋渡しする構成が特徴的である。量子力学の二大表記法を自然に接続し、抽象的な状態ベクトルの世界と、工学的応用に必要な具体的な波動関数計算を両立させている点が評価できる。本日もご訪問頂きありがとうございます。以上です！
29Sep
- R:サンプルが偶数個の中央値の分布を検証する
  本日は、オープンソースの統計解析ソフトであるRを用いてサンプル数が偶数個の中央値の分布を検証したい。中央値（メディアン）とは、データを小さい順（または大きい順）に並べたときに、ちょうど真ん中にくる値のことです。グラフを描くだけだが、Rで検証用のプログラムを組みたい。１０個の標準正規分布による乱数の中央値と理論値のグラフを作るRのプログラムは-------------------------set.seed(123)# 1. シミュレーションデータの作成x_median <- replicate(10000, median(rnorm(10)))x_median <- x_median[x_median < 2 & x_median > -2]# 2. 理論式のパラメータ設定（D4は整数にする必要があります）D2 <- 10 # サンプル数D4 <- 5.5 # 順序統計量のインデックス（5番目の値）# エラー修正：Rの関数（exp, lgamma）に修正D5 <- exp(lgamma(D2 + 1) - lgamma(D2 - D4 + 1) - lgamma(D4)) # ※順序統計量の係数（n! / ((n-k)!(k-1)!）を正しく計算するため、D2の階乗部分を lgamma(D2 + 1) にしています。# 3. 理論曲線の計算x_vals <- seq(-5, 5, length.out = 500)y_vals <- D5 * (pnorm(x_vals)^(D4 - 1)) * ((1 - pnorm(x_vals))^(D2 - D4)) * dnorm(x_vals)# 4. ヒストグラムの描画breaks_normal <- seq(min(x_median) - 0.1, max(x_median) + 0.1, length.out = 50)hist(x_median, breaks = breaks_normal, freq = FALSE, # 縦軸を確率密度にする col = rgb(1, 0, 0, 0.5), # 赤（透過） xlim = c(-2, 2), ylim = c(0, 1.5), main = "標準正規分布の中央値分布と理論曲線", xlab = "統計量", ylab = "密度")# 5. 理論曲線の重ね描きlines(x_vals, y_vals, col = "blue", lwd = 2)# 6. 凡例の追加legend("topright", legend = c("理論曲線 (数式)", "シミュレーション中央値"), col = c("blue", rgb(1, 0, 0, 0.5)), lwd = 2)----となります。テキストエディタなどに貼り付けてRにコピーして下さい。Rで作成したグラフは綺麗に近似しました。参考にしてください。書籍の紹介です。三笠宮―昭和天皇末弟の近現代史 (中公新書)Amazon（アマゾン）三笠宮―昭和天皇末弟の近現代史 (中公新書 2919)舟橋正真 (著)本書は、昭和天皇の末弟である三笠宮さまの生誕から2016年に100歳で亡くなるまでの生涯を描いた一冊です。後半の戦後以降の記述は大分駆け足になりますが、3人の息子に先立たれるなど、その波乱に満ちた人生の輪郭が丁寧に描写されています。特に興味深いのは戦前の動向です。青年将校による「二二六事件」の際、三笠宮さま（当時は澄宮）を巡って流れた様々な噂話も、本書で明かされる詳細な経歴や時代背景を重ね合わせて見ると、単なる流言飛語として片付けるのは早計であると感じさせられます。激動の昭和・平成を皇族として、そして一人の歴史学者としてどう生き抜いたのか。謎多きその素顔と、近代皇室の歩みを捉え直すための一級の入門書と言えます。ゼロから学ぶ量子力学Amazon（アマゾン）ゼロから学ぶ量子力学竹内薫 (著)日本人の著者による「行列」を用いた量子力学の解説を期待して本書を手に取りましたが、実際にはシュレディンガー方程式（微分方程式）の立場からの記述が中心でした。「ゼロから学ぶ」という表題通り、初心者向けの入門書であるため、発展的な内容や高度な数理的記述は含まれていません。マトリクス（行列）力学のディープな展開を期待する人には物足りないかもしれませんが、数式に苦手意識があり、まずは量子力学の全体像を文字通り「ゼロから」概観したいという入門者にとっては、非常に親切で読み進めやすい一冊と言えます。工科系量子力学Amazon（アマゾン）工科系量子力学椎木一夫 (著)本書は、工学系学生向けに量子力学を「計算できる形」に落とし込むことを目的とした教科書であり、Dirac式の抽象性と、微分方程式の具体計算のしやすさを巧みに橋渡しする構成が特徴的である。量子力学の二大表記法を自然に接続し、抽象的な状態ベクトルの世界と、工学的応用に必要な具体的な波動関数計算を両立させている点が評価できる。本日もご訪問頂きありがとうございます。以上です！
25Sep
- LibreOffice Calc:分散を求めてサンプルが偶数個の中央値の分布を検証する
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて2次の積率を求め分散を計算しサンプル数が偶数個の中央値の分布を検証したい。偶数個における中央値の乱数の生成法は『LibreOffice Calc:サンプルが偶数個の中央値の分布を検証する』本日は、昨日の予告通りオープンソースの表計算であるLibreOffice Calcのマクロを用いてサンプル数が偶数個の中央値の分布を検証したい。まず、標準正…ameblo.jpを参考にしてください。２次の積率を求めるのにシートに式を組みました。A列は0から10000までカウントします。セルB1=H1です。セルB2=B1+$H$4でB10001までコピーします。セルC1=$H$10*$H$13*(NORM.S.DIST(B1,TRUE())^($H$10-$H$12))*((1-NORM.S.DIST(B1,TRUE()))^($H$12-1))*NORM.S.DIST(B1,FALSE())*(B1^2)でC10001までコピーします。セルD2=IF(MOD(A2,2)=1,C2,0)でD10000までコピーします。セルE2=IF(MOD(A2,2)=0,C2,0)でE10000までコピーします。セルH4=(H2-H1)/H3です。セルH6=(C1+SUM(D2:D10000)*4+SUM(E2:E10000)*2+C10001)*H4/3です。セルH1は、積分の下限値です。セルH2は、積分の上限値です。セルH3を1000とするとB2のコピーはB1000までです。セルH6は2次の積率です。セルH10、H12とH13は密度関数にB列の二乗を掛けたものを計算するに使います。前回計算したA列をシートを使って検証します。A列は10個の標準正規分布によるサンプルの中央値が10000個出力されています。セルD2はサンプル数で10です。セルD4は中央値の位置で5.5となります。セルD5=EXP(GAMMALN(D2)-GAMMALN(D2-D4+1)-GAMMALN(D4))となり、二項係数の一般化です。セルD7は先程計算したセルH6で２次の積率です。セルD8=SQRT(D7)は分散になります。セルJ2は下限値です。セルJ3=J2+0.2でJ22までコピーします。セルF2=ROUND(J2-0.1,2)でF22までコピーします。グラフ作成上の数値になります。セルG2:G22を選択して=FREQUENCY(A:A,J2:J22)と入力しCtrl+Shift+Enterを押します。乱数の個数をカウントしています。セルH2=$D$2*$D$5*(NORM.S.DIST(F2,TRUE())^($D$2-$D$4))*((1-NORM.S.DIST(F2,TRUE()))^($D$4-1))*NORM.S.DIST(F2,FALSE())*10000*0.2でH22までコピーします。乱数の理論値になります。セルI2=NORM.DIST(F2,0,$D$8,0)*10000*0.2でI22までコピーします。分散による乱数の理論値になります。セルF2:J22は度数分布表になっていてこれをグラフにすると綺麗に近似しました。中央値の分布も正規分布になっているみたいですね。参考にしてください。書籍の紹介です。明治維新１０講 (岩波新書)Amazon（アマゾン）明治維新10講 (岩波新書新赤版 2091)三谷博 (著)本書は、徳川一橋家の家督騒動から西南戦争に至る時代を、従来の「幕末志士中心」の歴史観とは全く異なるアプローチで描いた一冊である。特筆すべきは、坂本龍馬や西郷隆盛といったお馴染みの英雄たちに関する記述が極めて少ない点だ。代わりに焦点が当てられているのは、老中や家老、公家といった政治の中枢にいた「統治者・実務家」たちの動向である。これまで語られがちだった前線の志士による劇的なドラマではなく、組織のトップやエリート層の思惑、そして制度の変革というマクロな視点からアプローチしている。これにより、明治維新という巨大な変革が持つ「政治史・構造史」としての側面が鮮やかに浮き彫りになる。大衆的な英雄譚の枠組みを超え、激動の時代を動かしたリアルな政治力学を炙り出す本書は、私たちに明治維新の新たな視座を与えてくれる。これまでの幕末史観に物足りなさを感じている歴史ファンはもちろん、組織論や政治の本質に関心がある現代の読者にとっても、深い洞察を得られる刺激的な一冊だ。最新　ワインの科学　芳醇な香りと味わいはどのように生まれるのか (ブルーバックス)Amazon（アマゾン）最新ワインの科学芳醇な香りと味わいはどのように生まれるのか (ブルーバックス B 2330)鈴木俊二 (著), 乙黒美彩 (著)ブルーバックスの定番とも言える「化学式の変化」といった難解な記述はほどほどに抑えられており、理系的な知識がなくてもすんなりと読み進められます。カベルネ・ソーヴィニヨンやメルローといった王道の品種だけでなく、多様なぶどう品種が紹介されている点も新鮮で、知的好奇心を刺激されました。特に印象的だったのは、酵母や乳酸菌による発酵のメカニズムに多くの紙面が割かれている点です。これまで「職人の経験や勘」によるものだと思っていたワイン造りが、いかに緻密な微生物たちの働きによって支えられているかを知り、ワインに対するイメージがガラリと変わりました。本書は、ワインの背後にある科学的な美しさを教えてくれる一冊です。次にグラスを傾けるときは、芳醇な香りと味わいの向こう側にいる、目に見えない酵母たちのドラマに思いを馳せずにはいられません。ワイン初心者から愛好家まで、いつもの一杯をより深く味わいたいすべての人におすすめしたい良書です。ｉＰＳ細胞と医療　最新技術でどこまで臓器は治せるか (ブルーバックス)Amazon（アマゾン）iPS細胞と医療最新技術でどこまで臓器は治せるか (ブルーバックス B 2327)高山和雄 (著)筆者は医学部ではなく薬学部の出身だが、本書は iPS細胞研究の全体像を理解するうえで格好の一冊である。主任研究員としての経験を踏まえ、研究の進め方や研究者のキャリアパスについても具体的に述べられており、研究の現場を知るうえでも有益である。本書は、iPS細胞研究の基礎から応用、そして研究者としての歩みまでを一望できる、入門書としても実務書としても価値ある一冊である。本日もご訪問頂きありがとうございます。以上です！
24Sep
- LibreOffice Calc:2×2行列の固有値の求め方
  本日は、オープンソースの表計算であるLibreOffice Calcのシートを用いて2×2行列の固有値を計算したい、固有値とはある正方行列にあるベクトルを掛け合わせた際、そのベクトルの「向きを変えずに倍率だけを変える」特殊な変換の事を言います。シートに式を組みました。セルA2:B3に任意の2×2行列を入力します。セルB5=IF(((A2-B3)^2)+4*(B2*A3)>=0,((A2+B3)+SQRT(((A2-B3)^2)+4*(B2*A3)))/2,COMPLEX((A2+B3)/2,SQRT(-((A2-B3)^2)-4*(B2*A3))/2))で最大固有根になります。セルB6=IF(((A2-B3)^2)+4*(B2*A3)>=0,((A2+B3)-SQRT(((A2-B3)^2)+4*(B2*A3)))/2,COMPLEX((A2+B3)/2,-SQRT(-((A2-B3)^2)-4*(B2*A3))/2))で最小固有根になります。セルA8=IMSUB(A2,B5)セルA9=A3セルB8=B2セルB9=IMSUB(B3,B5)セルD8=IMSUB(IMPRODUCT(A8,B9),IMPRODUCT(A9,B8))で固有方程式が0になることを確認出来ると思います。セルA11=IMSUB(A2,B6)セルA12=A3セルB11=B2セルB12=IMSUB(B3,B6)セルD11=IMSUB(IMPRODUCT(A11,B12),IMPRODUCT(A12,B11))で固有方程式が0になることを確認出来ると思います。テキストで行列は、-0.238375340174255 0.464093850467732-0.228725927675908 0.040908471356697最大固有根は-0.098733434408779+0.294364458844987i最小固有根は-0.098733434408779-0.294364458844987iです。固有根が求まったのがわかると思います。参考にしてください。書籍の紹介です。明治維新１０講 (岩波新書)Amazon（アマゾン）明治維新10講 (岩波新書新赤版 2091)三谷博 (著)本書は、徳川一橋家の家督騒動から西南戦争に至る時代を、従来の「幕末志士中心」の歴史観とは全く異なるアプローチで描いた一冊である。特筆すべきは、坂本龍馬や西郷隆盛といったお馴染みの英雄たちに関する記述が極めて少ない点だ。代わりに焦点が当てられているのは、老中や家老、公家といった政治の中枢にいた「統治者・実務家」たちの動向である。これまで語られがちだった前線の志士による劇的なドラマではなく、組織のトップやエリート層の思惑、そして制度の変革というマクロな視点からアプローチしている。これにより、明治維新という巨大な変革が持つ「政治史・構造史」としての側面が鮮やかに浮き彫りになる。大衆的な英雄譚の枠組みを超え、激動の時代を動かしたリアルな政治力学を炙り出す本書は、私たちに明治維新の新たな視座を与えてくれる。これまでの幕末史観に物足りなさを感じている歴史ファンはもちろん、組織論や政治の本質に関心がある現代の読者にとっても、深い洞察を得られる刺激的な一冊だ。最新　ワインの科学　芳醇な香りと味わいはどのように生まれるのか (ブルーバックス)Amazon（アマゾン）最新ワインの科学芳醇な香りと味わいはどのように生まれるのか (ブルーバックス B 2330)鈴木俊二 (著), 乙黒美彩 (著)ブルーバックスの定番とも言える「化学式の変化」といった難解な記述はほどほどに抑えられており、理系的な知識がなくてもすんなりと読み進められます。カベルネ・ソーヴィニヨンやメルローといった王道の品種だけでなく、多様なぶどう品種が紹介されている点も新鮮で、知的好奇心を刺激されました。特に印象的だったのは、酵母や乳酸菌による発酵のメカニズムに多くの紙面が割かれている点です。これまで「職人の経験や勘」によるものだと思っていたワイン造りが、いかに緻密な微生物たちの働きによって支えられているかを知り、ワインに対するイメージがガラリと変わりました。本書は、ワインの背後にある科学的な美しさを教えてくれる一冊です。次にグラスを傾けるときは、芳醇な香りと味わいの向こう側にいる、目に見えない酵母たちのドラマに思いを馳せずにはいられません。ワイン初心者から愛好家まで、いつもの一杯をより深く味わいたいすべての人におすすめしたい良書です。ｉＰＳ細胞と医療　最新技術でどこまで臓器は治せるか (ブルーバックス)Amazon（アマゾン）iPS細胞と医療最新技術でどこまで臓器は治せるか (ブルーバックス B 2327)高山和雄 (著)筆者は医学部ではなく薬学部の出身だが、本書は iPS細胞研究の全体像を理解するうえで格好の一冊である。主任研究員としての経験を踏まえ、研究の進め方や研究者のキャリアパスについても具体的に述べられており、研究の現場を知るうえでも有益である。本書は、iPS細胞研究の基礎から応用、そして研究者としての歩みまでを一望できる、入門書としても実務書としても価値ある一冊である。本日もご訪問頂きありがとうございます。以上です！
18Sep
- LibreOffice Calc:サンプルが偶数個の中央値の分布を検証する
  本日は、昨日の予告通りオープンソースの表計算であるLibreOffice Calcのマクロを用いてサンプル数が偶数個の中央値の分布を検証したい。まず、標準正規分布に従う10個の乱数を生成し、その中央値を求めるマクロを作成した。下記のようになります。（サンプル数が10の時の中央値は大きい方から5.5番目のサンプルとなり5番目と６番目の平均値を取ります。）--------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub Macro1() Dim oDoc As Object Dim oSheet As Object Dim oFunctionAccess As Object Dim a(100) As Double Dim n As Long Dim i As Long, j As Long, m As Long Dim temp As Double Dim med As Long Dim oArgs(0) As Variant ' Calcのシートと関数呼び出しの準備 oDoc = ThisComponent oSheet = oDoc.Sheets(0) ' 1番目のシートを取得 oFunctionAccess = CreateUnoService("com.sun.star.sheet.FunctionAccess") ' 乱数初期化 Randomize n = 10 'サンプル数 For m = 1 To 10000 '--------------------------------------- ' データ生成 '--------------------------------------- For i = 1 To n a(i) = Rnd() ' NORM.S.INV関数の引数をセットして呼び出し oArgs(0) = CDbl(a(i)) a(i) = oFunctionAccess.callFunction("NORM.S.INV", oArgs) Next i If n Mod 2 = 1 Then MsgBox "奇数を検出しました: " & n Exit Sub End If ' 昇順にソートする（1からnの範囲を正しくソート） For i = 1 To n - 1 For j = 1 To n - i If a(j) > a(j + 1) Then temp = a(j) a(j) = a(j + 1) a(j + 1) = temp End If Next j Next i ' 中央値の計算とセルへの出力 If n Mod 2 = 0 Then med = CLng(n / 2) ' 偶数の場合は中央の2値の平均（行インデックスは m-1） oSheet.getCellByPosition(0, m - 1).Value = (a(med) + a(med + 1)) / 2 Else med = CLng((n + 1) / 2) ' 奇数の場合は中央の値 oSheet.getCellByPosition(0, m - 1).Value = a(med) End If Next m MsgBox "処理が完了しました。"End Sub-------------------------A列に10000個、中央値を出力します。マクロで生成したA列を検証するために、シートに下記のように式を組みました。A列は10個の標準正規分布によるサンプルの中央値が10000個出力されています。セルD2はサンプル数で10です。セルD4は中央値の位置で5.5となります。セルD5=EXP(GAMMALN(D2)-GAMMALN(D2-D4+1)-GAMMALN(D4))となり、二項係数の一般化です。セルI2は下限値です。セルI3=I2+0.2でI22までコピーします。セルF2=ROUND(I2-0.1,2)でF22までコピーします。グラフ作成上の数値になります。セルG2:G22を選択して=FREQUENCY(A:A,I2:I22)と入力しCtrl+Shift+Enterを押します。乱数の個数をカウントしています。セルH2=$D$2*$D$5*(NORM.S.DIST(F2,TRUE())^($D$2-$D$4))*((1-NORM.S.DIST(F2,TRUE()))^($D$4-1))*NORM.S.DIST(F2,FALSE())*10000*0.2でH22までコピーします。乱数の理論値になります。奇数の場合の二項係数の計算を、セルD5の数式に置き換えたものがセルH2の計算になります。また、階乗n!の計算を小数（実数）でも計算できるように一般化したものをガンマ関数といいます。セルF2:I22は度数分布表になっていてこれをグラフにすると綺麗に近似しました。他にも計算の方法はあると思います。これは個人的な私案です。参考にしてください。書籍の紹介です。明治維新１０講 (岩波新書)Amazon（アマゾン）明治維新10講 (岩波新書新赤版 2091)三谷博 (著)本書は、徳川一橋家の家督騒動から西南戦争に至る時代を、従来の「幕末志士中心」の歴史観とは全く異なるアプローチで描いた一冊である。特筆すべきは、坂本龍馬や西郷隆盛といったお馴染みの英雄たちに関する記述が極めて少ない点だ。代わりに焦点が当てられているのは、老中や家老、公家といった政治の中枢にいた「統治者・実務家」たちの動向である。これまで語られがちだった前線の志士による劇的なドラマではなく、組織のトップやエリート層の思惑、そして制度の変革というマクロな視点からアプローチしている。これにより、明治維新という巨大な変革が持つ「政治史・構造史」としての側面が鮮やかに浮き彫りになる。大衆的な英雄譚の枠組みを超え、激動の時代を動かしたリアルな政治力学を炙り出す本書は、私たちに明治維新の新たな視座を与えてくれる。これまでの幕末史観に物足りなさを感じている歴史ファンはもちろん、組織論や政治の本質に関心がある現代の読者にとっても、深い洞察を得られる刺激的な一冊だ。最新　ワインの科学　芳醇な香りと味わいはどのように生まれるのか (ブルーバックス)Amazon（アマゾン）最新ワインの科学芳醇な香りと味わいはどのように生まれるのか (ブルーバックス B 2330)鈴木俊二 (著), 乙黒美彩 (著)ブルーバックスの定番とも言える「化学式の変化」といった難解な記述はほどほどに抑えられており、理系的な知識がなくてもすんなりと読み進められます。カベルネ・ソーヴィニヨンやメルローといった王道の品種だけでなく、多様なぶどう品種が紹介されている点も新鮮で、知的好奇心を刺激されました。特に印象的だったのは、酵母や乳酸菌による発酵のメカニズムに多くの紙面が割かれている点です。これまで「職人の経験や勘」によるものだと思っていたワイン造りが、いかに緻密な微生物たちの働きによって支えられているかを知り、ワインに対するイメージがガラリと変わりました。本書は、ワインの背後にある科学的な美しさを教えてくれる一冊です。次にグラスを傾けるときは、芳醇な香りと味わいの向こう側にいる、目に見えない酵母たちのドラマに思いを馳せずにはいられません。ワイン初心者から愛好家まで、いつもの一杯をより深く味わいたいすべての人におすすめしたい良書です。中央銀行―セントラルバンカーの経験した３９年Amazon（アマゾン）中央銀行―セントラルバンカーの経験した３９年白川方明 (著)まず、700ページにも及ぶ大著である。元日銀総裁である著者が、日銀が債務超過に陥る可能性についても率直に言及している点は特筆に値する。39年にわたる中央銀行での経験を淡々と綴りながらも、金融政策の本質と組織運営のリアリティが随所に浮かび上がり、中央銀行を理解するうえで必読の一冊となっている。本日もご訪問頂きありがとうございます。以上です！
17Sep
- LibreOffice Calc:サンプルが奇数個の中央値の分布を検証する
  本日は、オープンソースの表計算であるLibreOffice Calcのマクロを用いてサンプル数が奇数個の中央値の分布を検証したい。何故、サンプル数が奇数個か。単なる計算上の理由で、後日サンプル数が偶数個の中央値の分布について解決案を提示出来たらと考えております。まず、標準正規分布に従う９個の乱数を生成し、その中央値を求めるマクロを作成した。下記のようになります。（サンプル数が９の時の中央値は大きい方から５番目のサンプルです。）--------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub Macro1() Dim oDoc As Object Dim oSheet As Object Dim oFunctionAccess As Object '-------------------------------------------------------- Dim a(100) As Double Dim n As Long Dim i As Long, j As Long, M As Long Dim temp As Double Dim med As Long ' 関数の引数に使う配列を宣言 Dim oArgs(0) As Variant ' Calcのシートと関数呼び出しの準備 oDoc = ThisComponent oSheet = oDoc.Sheets(0) ' 1番目のシートを取得 oFunctionAccess = CreateUnoService("com.sun.star.sheet.FunctionAccess") ' 乱数初期化 Randomize n = 9 'サンプル数 For M = 1 To 10000 '--------------------------------------- ' データ生成 '--------------------------------------- For i = 1 To n a(i) = Rnd() ' NORM.S.INV関数の引数をセットして呼び出し oArgs(0) = CDbl(a(i)) a(i) = oFunctionAccess.callFunction("NORM.S.INV", oArgs) Next i If n Mod 2 = 0 Then MsgBox "偶数を検出しました: " & n Exit Sub End If ' 昇順にソートする（1からnの範囲を正しくソート） For i = 1 To n - 1 For j = 1 To n - i If a(j) > a(j + 1) Then temp = a(j) a(j) = a(j + 1) a(j + 1) = temp End If Next j Next i ' 中央値のインデックス計算 med = CLng((n + 1) / 2) ' セルへの出力（行、列ともに0から始まるため M-1, 0 に出力） oSheet.getCellByPosition(0, M - 1).Value = a(med) Next M MsgBox "処理が完了しました。"End Sub--------A列に10000個、中央値を出力します。マクロで生成したA列を検証するために、シートに下記のように式を組みました。A列は９個の標準正規分布によるサンプルの中央値が10000個出力されています。セルD2とD3はサンプル数、中央値が５番目の値という意味です。D2は適当に選んでください。セルI2は下限値です。セルI3=I2+0.2でI22までコピーします。セルF2=ROUND(I2-0.1,2)でF22までコピーします。グラフ作成上の数値になります。セルG2:G22を選択して=FREQUENCY(A:A,I2:I22)と入力しCtrl+Shift+Enterを押します。乱数の個数をカウントしています。セルH2=$D$2*COMBIN($D$2-1,$D$3-1)*(NORM.S.DIST(F2,TRUE())^($D$2-$D$3))*((1-NORM.S.DIST(F2,TRUE()))^($D$3-1))*NORM.S.DIST(F2,FALSE())*10000*0.2でH22までコピーします。乱数の理論値になります。セルF2:I22は度数分布表になっていてこれをグラフにすると綺麗に近似しました。参考にしてください。書籍の紹介です。象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書)Amazon（アマゾン）象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書新赤版 2038)原武史 (著)昭和天皇が戦後も側近に対して政治への不満を漏らしていたという話は耳にしたことがあったが、本書は『昭和天皇拝謁記』という一級史料を通じ、その具体的な言動を生々しく描き出している。興味深いのは、歴代天皇との姿勢の違いだ。例えば明治天皇は、有力政治家同士の意見が対立した際には、自らの意思を押し通すのではなく仲裁役に徹したとされる。これに対し、戦後に「象徴」となったはずの昭和天皇が、時に政治に対して強い関与の意思や不満を示していたという事実は、一見すると矛盾のようにも映る。本書が提示する「真実」とは、単なる最高権力者の愚痴ではない。それは、憲法上の制約を受けながらも、国政への責任感と自らの意志を捨てきれなかった「象徴天皇」という存在の、生々しい葛藤そのものである。私たちは本書を通じて、記号化された「象徴」の奥にある、近現代史のリアルな人間像を突きつけられることになる。最新　ウイスキーの科学　熟成の香味を生む驚きのプロセス (ブルーバックス)Amazon（アマゾン）最新ウイスキーの科学熟成の香味を生む驚きのプロセス (ブルーバックス 2047)古賀邦正 (著)ウイスキー造りが「職人の勘」によるものから、生化学などの「科学的なアプローチ」によって解き明かされる時代になっているのだと強く実感させられます。もちろん、いまだに解明されていない謎も多く残されているのでしょうが、「ここまで科学的な分析が進んでいるのか」と驚くばかりです。私自身、化学はあまり得意ではないため、専門的な用語は文字を追うだけで精一杯なところもあります。しかし、未知の領域だったウイスキーの複雑な香味の正体が、緻密な研究によって一つずつ証明されていくプロセスには、知的な興奮を覚えざるを得ませんでした。本書を読んだことで、次の一杯を口にするときの景色が少し変わりそうです。今後はグラスに注がれたウイスキーをただ味わうだけでなく、その琥珀色の液体の向こう側にある「科学の神秘」や研究者たちの情熱に、そっと思いを馳せながら楽しみたいと思います。中央銀行―セントラルバンカーの経験した３９年Amazon（アマゾン）中央銀行―セントラルバンカーの経験した３９年白川方明 (著)まず、700ページにも及ぶ大著である。元日銀総裁である著者が、日銀が債務超過に陥る可能性についても率直に言及している点は特筆に値する。39年にわたる中央銀行での経験を淡々と綴りながらも、金融政策の本質と組織運営のリアリティが随所に浮かび上がり、中央銀行を理解するうえで必読の一冊となっている。本日もご訪問頂きありがとうございます。以上です！
16Sep
- LibreOffice Calc:5次方程式の近似解
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて5次方程式の近似解を求める方法を提示したい。5次方程式は１世紀ほど前に、n乗根やルートのような一部の代数式では解けないと証明されたが、ブリング-ジェラードの標準形などのように特殊な形において解けることが示されている。シートに下記のように式を組みました。セルA2、B2、C2、D2、E2とF2はそれぞれの次数の係数です。適宜数値を決めてください。セルB4=COMPLEX(B100,C100)で３次方程式の近似解です。セルC4=IMSUM(IMSUM(IMSUM(IMSUM(IMSUM(IMSUM(IMPOWER(B4,5),$A$2),IMPRODUCT(IMPOWER(B4,4),$B$2)),IMPRODUCT(IMPOWER(B4,3),$C$2)),IMPRODUCT(IMPOWER(B4,2),$D$2)),IMPRODUCT($E$2,B4)),$F$2)で近似解を入力し方程式を計算するとほぼ0になっていることが確認出来ると思います。セルB6は初期値の実部で1としています。セルC6は初期値の虚部で1としています。セルD6=COMPLEX(B6,C6)で虚数に変換しています。セルD100までコピーします。セルE6=IMSUM(IMSUM(IMSUM(IMSUM(IMSUM(IMSUM(IMPOWER(D6,5),$A$2),IMPRODUCT(IMPOWER(D6,4),$B$2)),IMPRODUCT(IMPOWER(D6,3),$C$2)),IMPRODUCT(IMPOWER(D6,2),$D$2)),IMPRODUCT($E$2,D6)),$F$2)でD6で入力された数値で方程式の値を表示しています。セルE100までコピーします。セルF6=IMSUM(IMSUM(IMSUM(IMSUM(IMSUM(IMPOWER(D6,4),5*$A$2),IMPRODUCT(IMPOWER(D6,3),4*$B$2)),IMPRODUCT(IMPOWER(D6,2),$C$2*3)),IMPRODUCT(D6,$D$2*2)),$E$2)でセルF100までコピーします。セルG6=IMDIV(E6,F6)でセルG100までコピーします。セルH6=IMSUB(D6,G6)でセルH100までコピーします。セルB7=IMREAL(H6)でセルH6の実部です。セルB100までコピーします。セルC7=IMAGINARY(H6)でセルH6の虚部です。セルC100までコピーします。解は0.592927470240636+1.25207587899429iとなります。他の４つの解の近くに初期値を設定すれば解が求まりますが、取り合えず１個の近似解が求まります。３次方程式の近似解を求めた考え方と同じ考え方で解いているので同じ欠点も引き継いでしまいます。3次方程式の時より少し解が収束するのに時間がかかっているようで、まだ改良の余地がありそうです。参考にしてください。書籍の紹介です。象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書)Amazon（アマゾン）象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書新赤版 2038)原武史 (著)昭和天皇が戦後も側近に対して政治への不満を漏らしていたという話は耳にしたことがあったが、本書は『昭和天皇拝謁記』という一級史料を通じ、その具体的な言動を生々しく描き出している。興味深いのは、歴代天皇との姿勢の違いだ。例えば明治天皇は、有力政治家同士の意見が対立した際には、自らの意思を押し通すのではなく仲裁役に徹したとされる。これに対し、戦後に「象徴」となったはずの昭和天皇が、時に政治に対して強い関与の意思や不満を示していたという事実は、一見すると矛盾のようにも映る。本書が提示する「真実」とは、単なる最高権力者の愚痴ではない。それは、憲法上の制約を受けながらも、国政への責任感と自らの意志を捨てきれなかった「象徴天皇」という存在の、生々しい葛藤そのものである。私たちは本書を通じて、記号化された「象徴」の奥にある、近現代史のリアルな人間像を突きつけられることになる。最新　ウイスキーの科学　熟成の香味を生む驚きのプロセス (ブルーバックス)Amazon（アマゾン）最新ウイスキーの科学熟成の香味を生む驚きのプロセス (ブルーバックス 2047)古賀邦正 (著)ウイスキー造りが「職人の勘」によるものから、生化学などの「科学的なアプローチ」によって解き明かされる時代になっているのだと強く実感させられます。もちろん、いまだに解明されていない謎も多く残されているのでしょうが、「ここまで科学的な分析が進んでいるのか」と驚くばかりです。私自身、化学はあまり得意ではないため、専門的な用語は文字を追うだけで精一杯なところもあります。しかし、未知の領域だったウイスキーの複雑な香味の正体が、緻密な研究によって一つずつ証明されていくプロセスには、知的な興奮を覚えざるを得ませんでした。本書を読んだことで、次の一杯を口にするときの景色が少し変わりそうです。今後はグラスに注がれたウイスキーをただ味わうだけでなく、その琥珀色の液体の向こう側にある「科学の神秘」や研究者たちの情熱に、そっと思いを馳せながら楽しみたいと思います。中央銀行―セントラルバンカーの経験した３９年Amazon（アマゾン）中央銀行―セントラルバンカーの経験した３９年白川方明 (著)まず、700ページにも及ぶ大著である。元日銀総裁である著者が、日銀が債務超過に陥る可能性についても率直に言及している点は特筆に値する。39年にわたる中央銀行での経験を淡々と綴りながらも、金融政策の本質と組織運営のリアリティが随所に浮かび上がり、中央銀行を理解するうえで必読の一冊となっている。本日もご訪問頂きありがとうございます。以上です！
15Sep
- LibreOffice Calc:3次方程式の近似解
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて３次方程式の近似解を求める方法を提示したい。３次方程式の解法ではカルダノの方法などが有名であるが本ブログは３次方程式の解法は未解決との立場を取りたい。シートに下記のように式を組みました。セルA2、B2、C2とD2はそれぞれの次数の係数です。適宜数値を決めてください。セルB4=COMPLEX(B20,C20)で３次方程式の近似解です。セルC4=IMSUM(IMSUM(IMSUM(IMSUM(IMPRODUCT(IMPOWER(B4,3),$A$2)),IMPRODUCT(IMPOWER(B4,2),$B$2)),IMPRODUCT($C$2,B4)),$D$2)で近似解を入力し方程式を計算するとほぼ0になっていることが確認出来ると思います。セルB6は初期値の実部で1としています。セルC6は初期値の虚部で1としています。セルD6=COMPLEX(B6,C6)で虚数に変換しています。セルD20までコピーします。セルE6=IMSUM(IMSUM(IMSUM(IMSUM(IMPRODUCT(IMPOWER(D6,3),$A$2)),IMPRODUCT(IMPOWER(D6,2),$B$2)),IMPRODUCT($C$2,D6)),$D$2)でD6で入力された数値で方程式の値を表示しています。セルE20までコピーします。セルF6=IMSUM(IMSUM(IMSUM(IMPRODUCT(IMPOWER(D6,2),$A$2*3)),IMPRODUCT(D6,$B$2*2)),$C$2)でセルF20までコピーします。セルG6=IMDIV(E6,F6)でセルG20までコピーします。セルH6=IMSUB(D6,G6)でセルH20までコピーします。セルB7=IMREAL(H6)でセルH6の実部です。セルB20までコピーします。セルC7=IMAGINARY(H6)でセルH6の虚部です。セルC20までコピーします。解は-0.174685404280307+1.5468688872314iとなります。他の２つの解の近くに初期値を設定すれば解が求まりますが、取り合えず１個の近似解が求まります。参考にしてください。書籍の紹介です。象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書)Amazon（アマゾン）象徴天皇の実像　「昭和天皇拝謁記」を読む (岩波新書新赤版 2038)原武史 (著)昭和天皇が戦後も側近に対して政治への不満を漏らしていたという話は耳にしたことがあったが、本書は『昭和天皇拝謁記』という一級史料を通じ、その具体的な言動を生々しく描き出している。興味深いのは、歴代天皇との姿勢の違いだ。例えば明治天皇は、有力政治家同士の意見が対立した際には、自らの意思を押し通すのではなく仲裁役に徹したとされる。これに対し、戦後に「象徴」となったはずの昭和天皇が、時に政治に対して強い関与の意思や不満を示していたという事実は、一見すると矛盾のようにも映る。本書が提示する「真実」とは、単なる最高権力者の愚痴ではない。それは、憲法上の制約を受けながらも、国政への責任感と自らの意志を捨てきれなかった「象徴天皇」という存在の、生々しい葛藤そのものである。私たちは本書を通じて、記号化された「象徴」の奥にある、近現代史のリアルな人間像を突きつけられることになる。最新　ウイスキーの科学　熟成の香味を生む驚きのプロセス (ブルーバックス)Amazon（アマゾン）最新ウイスキーの科学熟成の香味を生む驚きのプロセス (ブルーバックス 2047)古賀邦正 (著)ウイスキー造りが「職人の勘」によるものから、生化学などの「科学的なアプローチ」によって解き明かされる時代になっているのだと強く実感させられます。もちろん、いまだに解明されていない謎も多く残されているのでしょうが、「ここまで科学的な分析が進んでいるのか」と驚くばかりです。私自身、化学はあまり得意ではないため、専門的な用語は文字を追うだけで精一杯なところもあります。しかし、未知の領域だったウイスキーの複雑な香味の正体が、緻密な研究によって一つずつ証明されていくプロセスには、知的な興奮を覚えざるを得ませんでした。本書を読んだことで、次の一杯を口にするときの景色が少し変わりそうです。今後はグラスに注がれたウイスキーをただ味わうだけでなく、その琥珀色の液体の向こう側にある「科学の神秘」や研究者たちの情熱に、そっと思いを馳せながら楽しみたいと思います。中央銀行―セントラルバンカーの経験した３９年Amazon（アマゾン）中央銀行―セントラルバンカーの経験した３９年白川方明 (著)まず、700ページにも及ぶ大著である。元日銀総裁である著者が、日銀が債務超過に陥る可能性についても率直に言及している点は特筆に値する。39年にわたる中央銀行での経験を淡々と綴りながらも、金融政策の本質と組織運営のリアリティが随所に浮かび上がり、中央銀行を理解するうえで必読の一冊となっている。本日もご訪問頂きありがとうございます。以上です！
11Sep
- LibreOffice Calcのグラフで円を描いてみる
  本日は、オープンソースの表計算であるLibreOffice Calcを用いてグラフの散布図を使って円を描いてみたいと考えています。円を描くのに基になるデータが必要なので下記のようにシートに式を組みました。まずA列に0から100まで数値を入力します。セルB1=A1*PI()*2/100と入力しB101までコピーします。セルC1=COS(B1)と入力しC101までコピーします。セルD1=SIN(B1)と入力しD101までコピーします。グラフの種類は「散布図」の線のみです。ダイアログのようにデータを指定します。円のグラフが出来上がりました。参考にしてください。本の紹介です。憲法とは何か (岩波新書新赤版 1002)Amazon（アマゾン）憲法とは何か (岩波新書新赤版 1002)長谷部恭男 (著)単に憲法の条文や判例の解釈を解説するのではなく、「そもそも憲法とはなぜ必要なのか」「立憲主義とはどのような思想なのか」という根本的な問いを掘り下げた憲法の入門書である。本書の特徴は、各章の終わりにそのテーマを一歩進めて考えるための発展的な文献案内が添えられている点にある。読者は単に著者の議論を受け入れるだけでなく、紹介された文献を手がかりに、自ら思索を深めていくことができる。国家権力を制限し、個人の尊厳を守るための「枠組み」である憲法の本質を、歴史的・哲学的な視点から平易に解き明かす本作は、変化の激しい現代社会を生きる私たちに普遍的な思考の足場を提供してくれる。憲法をめぐる議論が溢れる今だからこそ、小手先の知識にとどまらない「本質的な理解」を得るために、広く読まれるべき不朽の一冊である。カラー版　ビールの科学　麦芽とホップが生み出す「旨さ」の秘密 (ブルーバックス)Amazon（アマゾン）カラー版ビールの科学麦芽とホップが生み出す「旨さ」の秘密 (ブルーバックス 2063)渡淳二 (編集)『ビールの科学―麦とホップが生み出すおいしさの秘密』の改版となる本書。ピルスナー、ラガー、エールといったスタイルの違いや、生ビールの製造法などがさらに詳しく解説されています。近年の酒税法改正による「ビールの定義」の変化にも触れており、今後さらに個性的なクラフトビールが登場する予感にワクワクさせられます。ビール好きなら思わず喉が鳴る、知的好奇心を満たしてくれる一冊です。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
10Sep
- LibreOffice Calcでマクロを用いて超幾何分布の乱数を生成する方法
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて超幾何分布の乱数を生成するマクロを作ってみたいと思います。超幾何分布とは、成功状態をもつ母集団から非復元抽出したときに成功状態がいくつあるかという確率を与える離散確率分布の一種です。母集団の標本数=100、母集団の成功数=30、抜き取りの標本数=50とし、LibreOffice Calcで実行できるマクロは下記のようになります。------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub Macro1() Dim simula As Long, N As Long, K As Long, a As Long Dim j As Long, i As Long, x As Long, b As Long, c As Long Dim oDoc As Object, oSheet As Object, oCellRange As Object Dim dataArray() As Variant simula = 10000 '乱数の個数 N = 100 '母集団の標本数 K = 30 '母集団の成功数 a = 50 '抜取の標本数 ' 乱数シミュレーションの初期化 Randomize ' 結果を格納する配列を準備（1列 × simula行） ReDim dataArray(0 To simula - 1, 0 To 0) ' シミュレーション実行 For j = 1 To simula x = 0 b = K '母集団の成功数のカウンター c = N '母集団の標本数のカウンター For i = 1 To a If x < 30 Then If Rnd() <= b / c Then x = x + 1 b = b - 1 End If End If c = c - 1 Next i ' 配列に結果を代入（0始まりのインデックス） dataArray(j - 1, 0) = x Next j ' 現在のアクティブシートを取得 oDoc = ThisComponent oSheet = oDoc.CurrentController.ActiveSheet ' データを書き込むセル範囲（A1:A10000）を指定して一括出力 oCellRange = oSheet.getCellRangeByPosition(0, 0, 0, simula - 1) ' (開始列, 開始行, 終了列, 終了行) oCellRange.setDataArray(dataArray)End Sub--------------------------カットアンドペーストして頂ければ実行できると思います。A列に10000個乱数を生成します。マクロの実行結果を検証するために下記のようにシートに式を組みました。A列は上記マクロを実行した結果です。B列はExcelのVBAで実行した結果です。セルD1は母集団のサンプル数です。セルD2は母集団の成功数です。セルD3は抜き取りのサンプル数です。F列は抜取の成功数です。G2=COUNTIF(A:A,F2)と入力しG32までコピーします。Calcの乱数の度数分布表が出来ます。H2=COUNTIF(B:B,F2)と入力しH32までコピーします。Excelの乱数の度数分布表が出来ます。セルI2=HYPGEOM.DIST(F2,$D$3,$D$2,$D$1,FALSE())*10000と入力しセルI32までコピーします。乱数の理論値が出ます。F1:I32のデータは度数分布表になっていてこれを元にグラフを作成すると綺麗に近似しました。参考にしてください。本の紹介です。ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)Amazon（アマゾン）ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)小島寛之 (著)ラマヌジャンの生涯を淡々と語りながら、ゼータ関数やオイラー積、リーマン予想との関係性を解説している。後半からは駆け足になるものの、保型形式や楕円曲線、そしてフェルマーの最終定理の解決に至るまで、彼の残した業績がいかに現代数学へ関連しているかにも触れている。ラマヌジャンの才能を見抜いた教授の嫉妬など、数学の世界の生々しい現実にまで踏み込んでいる点が本書の大きな魅力だ。数式の背後にある無限の世界と、天才を巡る人間模様を同時に覗いてみたい読者にとって、格好の道標となるだろう。多様性とどう向き合うか: 違和感から考える (岩波新書)Amazon（アマゾン）多様性とどう向き合うか──違和感から考える (岩波新書新赤版 2094)岩渕功一 (著) 形式: 新書移民問題や障害者、LGBTQ+を巡る議論など、「多様性」への向き合い方は現在の日本社会にとっても避けて通れない喫緊の課題である。本書は、昨今の安易な多様性の奨励（お題目）を単に批判して退けるのではない。私たちが日々抱く「違和感」をフックに、その概念をどう問いほぐし、いかにして社会を編みなおしていくべきかという、しなやかで本質的な議論を展開している。分断が進むいまの日本社会だからこそ読まれるべき、本質的な「共生」への手引書である。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
09Sep
- LibreOffice Calc：編集メニューの機能・項目一覧
  本日は、オープンソースの表計算であるLibreOffice Calcにおける編集メニューの機能・項目一覧をスクリーンショットで紹介したい。「編集」以下のメニュー構成です。「形式を選択して貼り付け」以下のメニュー構成です。「選択」以下のメニュー構成です。「変更の追跡」以下のメニュー構成です。ざっとですが編集メニューはこんな感じです。参考にしてください。本の紹介です。ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)Amazon（アマゾン）ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)小島寛之 (著)ラマヌジャンの生涯を淡々と語りながら、ゼータ関数やオイラー積、リーマン予想との関係性を解説している。後半からは駆け足になるものの、保型形式や楕円曲線、そしてフェルマーの最終定理の解決に至るまで、彼の残した業績がいかに現代数学へ関連しているかにも触れている。ラマヌジャンの才能を見抜いた教授の嫉妬など、数学の世界の生々しい現実にまで踏み込んでいる点が本書の大きな魅力だ。数式の背後にある無限の世界と、天才を巡る人間模様を同時に覗いてみたい読者にとって、格好の道標となるだろう。多様性とどう向き合うか: 違和感から考える (岩波新書)Amazon（アマゾン）多様性とどう向き合うか──違和感から考える (岩波新書新赤版 2094)岩渕功一 (著) 形式: 新書移民問題や障害者、LGBTQ+を巡る議論など、「多様性」への向き合い方は現在の日本社会にとっても避けて通れない喫緊の課題である。本書は、昨今の安易な多様性の奨励（お題目）を単に批判して退けるのではない。私たちが日々抱く「違和感」をフックに、その概念をどう問いほぐし、いかにして社会を編みなおしていくべきかという、しなやかで本質的な議論を展開している。分断が進むいまの日本社会だからこそ読まれるべき、本質的な「共生」への手引書である。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
08Sep
- LibreOffice Calc：ファイルメニューの機能・項目一覧
  本日は、オープンソースの表計算であるLibreOffice Calcにおけるファイルメニューの機能・項目一覧をスクリーンショットで紹介したい。まず、「ファイル」以下のメニュー構成です。「ウィザード」以下のメニュー構成です。「テンプレート」以下のメニュー構成です。「送る」以下のメニュー構成です。「デジタル署名」以下のメニュー構成です。開けるファイル形式の一覧1です。開けるファイル形式の一覧２です。保存できるファイル形式の一覧です。ざっとですがファイルメニューはこんな感じです。参考にしてください。本の紹介です。ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)Amazon（アマゾン）ラマヌジャンの数学無限を掴んだ数学者 (ブルーバックス B 2315)小島寛之 (著)ラマヌジャンの生涯を淡々と語りながら、ゼータ関数やオイラー積、リーマン予想との関係性を解説している。後半からは駆け足になるものの、保型形式や楕円曲線、そしてフェルマーの最終定理の解決に至るまで、彼の残した業績がいかに現代数学へ関連しているかにも触れている。ラマヌジャンの才能を見抜いた教授の嫉妬など、数学の世界の生々しい現実にまで踏み込んでいる点が本書の大きな魅力だ。数式の背後にある無限の世界と、天才を巡る人間模様を同時に覗いてみたい読者にとって、格好の道標となるだろう。多様性とどう向き合うか: 違和感から考える (岩波新書)Amazon（アマゾン）多様性とどう向き合うか──違和感から考える (岩波新書新赤版 2094)岩渕功一 (著) 形式: 新書移民問題や障害者、LGBTQ+を巡る議論など、「多様性」への向き合い方は現在の日本社会にとっても避けて通れない喫緊の課題である。本書は、昨今の安易な多様性の奨励（お題目）を単に批判して退けるのではない。私たちが日々抱く「違和感」をフックに、その概念をどう問いほぐし、いかにして社会を編みなおしていくべきかという、しなやかで本質的な議論を展開している。分断が進むいまの日本社会だからこそ読まれるべき、本質的な「共生」への手引書である。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
04Sep
- LibreOffice Calcでマクロを用いて対応のあるt検定の分布を検証する
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて対応のあるt検定の分布を検証するマクロを作ってみたいと思います。対応のあるt検定とは、同じ50代の人が『広告を見る前』と『見た後』で購買額に差があるかなど、データ同士に（関連）関係がある2つのグループの平均値に差があるかを見たいときに利用します。二変量標準正規分布の乱数を生成します。相関係数ρ=0.5でサンプル数N=30です。LibreOffice Calcで実行できるマクロは下記のようになります。--------------------------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1REM ***** BASIC *****Sub Macro1() Dim oDoc As Object Dim oSheet As Object Dim oFunctionAccess As Object Dim x(1 To 10, 1 To 100) As Double Dim y(1 To 100) As Double Dim i As Long, k As Long Dim N As Long Dim rho As Double Dim ave As Double Dim S As Double Dim T As Double ' ドキュメントとシート、関数アクセスの初期化 oDoc = ThisComponent oSheet = oDoc.Sheets(0) ' 1番左のシート（インデックス0） oFunctionAccess = CreateUnoService("com.sun.star.sheet.FunctionAccess") ' 乱数の初期化 Randomize ' 変数の設定（元のコードで未定義だったrhoを仮に0.5として設定） N = 30 rho = 0.5 ' 高速化のため、結果を格納する配列を用意 ' 10000行、1列の2次元配列（0ベース） Dim resultArray(0 To 9999, 0 To 0) As Double For k = 1 To 10000 ' ループごとの変数の初期化 S = 0 ave = 0 ' --- 一様乱数生成と標準正規分布への変換 --- For i = 1 To N ' 1つ目の変数 x(1, i) = Rnd() x(1, i) = oFunctionAccess.callFunction("NORMSINV", Array(x(1, i))) ' 2つ目の変数 x(2, i) = Rnd() x(2, i) = oFunctionAccess.callFunction("NORMSINV", Array(x(2, i))) ' 相関を持たせる x(2, i) = rho * x(1, i) + ((1 - rho ^ 2) ^ 0.5) * x(2, i) Next i ' 差の算出 For i = 1 To N y(i) = x(1, i) - x(2, i) Next i ' --- 平均の計算 --- For i = 1 To N ave = ave + y(i) Next i ave = ave / N ' --- 不偏分散の計算 --- For i = 1 To N S = S + (y(i) - ave) * (y(i) - ave) Next i ' 不偏化 S = S / (N - 1) ' t値の計算（分母のゼロ除算を防ぐため条件判定） If S > 0 Then T = ave / ((S / N) ^ 0.5) Else T = 0 End If ' 配列に結果を格納（インデックスは0から始まるため k-1） resultArray(k - 1, 0) = T Next k ' セル範囲（A1:A10000）を取得して一括書き込み（超高速化） Dim oCellRange As Object oCellRange = oSheet.getCellRangeByPosition(0, 0, 0, 9999) ' (左列, 上行, 右列, 下行) oCellRange.setDataArray(resultArray) MsgBox "シミュレーションが完了しました。"End Sub----------------------------------Tが対応のあるt検定の統計量です。カットアンドペーストして頂ければ実行できると思います。マクロの実行結果を検証するために下記のようにシートに式を組みました。A列は上記マクロを実行した結果です。B列はExcelのVBAで実行した結果です。セルD2は群１のサンプル数です。セルD3は群2のサンプル数です。セルD4は統計量の自由度です。自由度=群１のサンプル数-1です。セルJ2は統計量の下限値です。セルJ3=J2+0.25でセルJ39までコピーします。セルF2=J2-0.125でセルF39までコピーします。G2:G39を選択し=FREQUENCY(A:A,J2:J39)と入力しCtrl+Shift+Enterを押します。Calcの乱数の度数分布表が出来ます。H2:H39を選択し=FREQUENCY(B:B,J2:J39)と入力しCtrl+Shift+Enterを押します。Excelの乱数の度数分布表が出来ます。セルI2=T.DIST(F2,$D$4,FALSE())*10000*0.25と入力しセルI39までコピーします。乱数の理論値が出ます。Tは自由度=29のt分布に従います。F1:I39のデータは度数分布表になっていてこれを元にグラフを作成すると綺麗に近似しました。参考にしてください。世界は基準値でできている　未知のリスクにどう向き合うか (ブルーバックス)Amazon（アマゾン）世界は基準値でできている　未知のリスクにどう向き合うか (ブルーバックス)永井孝志 (著), 村上道夫 (著), 小野恭子 (著), 岸本充生 (著)講談社ブルーバックスの『世界は基準値でできている未知のリスクにどう向き合うか』は、私たちが普段疑いもしない「数値」の裏側を解き明かす一冊だ。本書では、日本ではあまり深く報道されない「オリンピックにおける女子選手の性別判定問題（トランスジェンダー選手の出場基準）」を鋭く取り上げている。科学的な線引きの変遷を追うことで、昨今LGBTQ+が社会に受け入れられるようになった背景やその根拠を論理的に推測させる記述は非常に興味深い。さらに、セーヌ川で話題を呼んだ「トライアスロンと水浴の水質基準」、福島などの「放射線の基準値」、そしてメリット・デメリットが議論される「がん検診の基準値」など、身近かつ多岐にわたるテーマに触れている。本書を読み終えると、あらゆる「基準値」は単なる客観的なデータではなく、社会の合意や価値観によって作られた「人間味のある線引き」なのだと気づかされる。溢れる情報や未知のリスクに振り回されず、自ら思考して主体的に向き合うための科学リテラシーを授けてくれる名著だ。ユダヤ人とユダヤ教 (岩波新書)Amazon（アマゾン）ユダヤ人とユダヤ教 (岩波新書新赤版 1755)市川裕 (著)市川裕氏による本書は、ユダヤ人とユダヤ教における歴史、信仰、学問、社会の基礎を、入門以前の段階から丁寧に紐解いた概説書である。この分野をさらに深く掘り下げるための有益な参考文献も網羅されている。単なる概要の解説にとどまらず、読者が自ら次のステップへと学びを深めていけるよう設計されており、まさに知の扉を開くための格好の案内書と言える。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
03Sep
- LibreOffice Calcでフィルターを実行するには
  本日は、LibreOffice Calcでフィルターを実行する方法を解説したいと思います。表計算のフィルターとは、大量のデータから指定した条件に一致する行だけを表示し、不要なデータを一時的に隠す機能です。ファイルを用意します。回答者を除外してデータを選択してメニューバーのをクリックします。データのラベルにが付きフィルターを使う準備が出来ました。セルB1の「x1」のを押すとダイアログが出てきます。チェックを「1」ののみにします。「x1」が「1」のみのデータが表示されます。「x2」を「1」のみにします。「x1」と「x2」が「1」のみのデータが表示されました。これがフィルター機能の流れです。参考にしてください。本の紹介です。世界一面白い脳の講義　脳の謎を科学で解き明かす (ブルーバックス)Amazon（アマゾン）世界一面白い脳の講義脳の謎を科学で解き明かす (ブルーバックス B 2337)日本神経科学学会 (編集)神経科学という広大な世界を、十人十色の視点から旅するオムニバスのような一冊です。そこには、最先端の研究成果だけでなく、研究者が未知の領域と向き合う時の興奮、葛藤、粘り強さ、そして未来への希望が生き生きと描かれています。科学の進歩の裏にある「研究のドラマ」を体感したい方に、ぜひ手に取ってほしい一冊です。群論入門対称性をはかる数学 (ブルーバックス 1917)Amazon（アマゾン）群論入門　対称性をはかる数学 (ブルーバックス)芳沢光雄 (著)本書は、巡回群を「あみだくじ」で表現するという斬新なアイデアから始まります。ユニークな導入で敷居を下げつつも、中身は「定理を提示し、それを証明する」という数学の基本に極めて忠実な記述になっています。後半では「n次ラテン方陣」をはじめとする未解決のテーマにまで触れており、入門書でありながら最先端の数学の奥深さを覗かせてくれます。直感を刺激する分かりやすさと、数学的な厳密さが見事に両立した、大人の学び直しや数学ファンに心から薦めたい一冊です。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
02Sep
- LibreOffice Calcでマクロを実行するには
  本日は、LibreOffice Calcでマクロを実行する方法を解説したいと思います。Excelで作成したマクロ付きファイルを用意しそれを例に話を進めたいと考えています。まず、ファイルを読み込みます。メニューバーの「ツール」から「マクロ」を選択し「マクロを実行」クリックします。ダイアログが出てきます。「VBAProject」の「Module1」を選択すると実行可能なマクロが出てきます。実行するマクロを選択して「実行」をクリックします。実行が完了しました。参考にしてください。本の紹介です。世界一面白い脳の講義　脳の謎を科学で解き明かす (ブルーバックス)Amazon（アマゾン）世界一面白い脳の講義脳の謎を科学で解き明かす (ブルーバックス B 2337)日本神経科学学会 (編集)神経科学という広大な世界を、十人十色の視点から旅するオムニバスのような一冊です。そこには、最先端の研究成果だけでなく、研究者が未知の領域と向き合う時の興奮、葛藤、粘り強さ、そして未来への希望が生き生きと描かれています。科学の進歩の裏にある「研究のドラマ」を体感したい方に、ぜひ手に取ってほしい一冊です。群論入門対称性をはかる数学 (ブルーバックス 1917)Amazon（アマゾン）群論入門　対称性をはかる数学 (ブルーバックス)芳沢光雄 (著)本書は、巡回群を「あみだくじ」で表現するという斬新なアイデアから始まります。ユニークな導入で敷居を下げつつも、中身は「定理を提示し、それを証明する」という数学の基本に極めて忠実な記述になっています。後半では「n次ラテン方陣」をはじめとする未解決のテーマにまで触れており、入門書でありながら最先端の数学の奥深さを覗かせてくれます。直感を刺激する分かりやすさと、数学的な厳密さが見事に両立した、大人の学び直しや数学ファンに心から薦めたい一冊です。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
01Sep
- LibreOffice Calcでマクロを編集するには
  本日は、LibreOffice Calcでマクロを編集する方法を解説したいと思います。まだ、Excelで作成したマクロ付きファイルを読み込む方法しか試していないのでそれを例にしたいと思います。ブレークポイントの貼り方などはまた次の機会にしたいと考えています。まずセキュリティの設定を変更します。メニューバーの「ツール」から「オプション」をクリックします。「セキュリティ」を選択し、「マクロセキュリティ」をクリックします。「中」を選択します。これでマクロを実行できるようになりました。次にファイルを読み込みます。メニューバーの「ファイル」選択し「開く」をクリックします。ダイアログが出てくるので「マクロの有効化」をクリックします。メニューバーの「ツール」から「マクロ」に行き「マクロの編集」をクリックします。ウインドウが開きます。Excelで作成したファイルを開いているのでLibreOffice Calcで作成したファイルだと構成が変わるかもしれません。開いたファイルの「VBAProject」の下にマクロが出てくるのでここに貼ればマクロが動くようになります。実行方法は後日にします。参考にしてください。本の紹介です。世界一面白い脳の講義　脳の謎を科学で解き明かす (ブルーバックス)Amazon（アマゾン）世界一面白い脳の講義脳の謎を科学で解き明かす (ブルーバックス B 2337)日本神経科学学会 (編集)神経科学という広大な世界を、十人十色の視点から旅するオムニバスのような一冊です。そこには、最先端の研究成果だけでなく、研究者が未知の領域と向き合う時の興奮、葛藤、粘り強さ、そして未来への希望が生き生きと描かれています。科学の進歩の裏にある「研究のドラマ」を体感したい方に、ぜひ手に取ってほしい一冊です。群論入門対称性をはかる数学 (ブルーバックス 1917)Amazon（アマゾン）群論入門　対称性をはかる数学 (ブルーバックス)芳沢光雄 (著)本書は、巡回群を「あみだくじ」で表現するという斬新なアイデアから始まります。ユニークな導入で敷居を下げつつも、中身は「定理を提示し、それを証明する」という数学の基本に極めて忠実な記述になっています。後半では「n次ラテン方陣」をはじめとする未解決のテーマにまで触れており、入門書でありながら最先端の数学の奥深さを覗かせてくれます。直感を刺激する分かりやすさと、数学的な厳密さが見事に両立した、大人の学び直しや数学ファンに心から薦めたい一冊です。官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)Amazon（アマゾン）官僚たちのアベノミクス－異形の経済政策はいかに作られたか (岩波新書)軽部謙介 (著)政権交代は、ただの政治イベントではなかった。本書が描くのは、2012年、長い停滞の闇を切り裂くように誕生した新政権が、霞が関の奥深くに眠っていた巨大な官僚機構を再び動かし始める。その瞬間のドラマだ。もちろん本書はアベノミクスを賛美するわけではない。政策の限界、官僚機構の構造的問題、政治との緊張――それらの影にも丁寧に描かれる。『官僚たちのアベノミクス』は、政策論の本でありながら、政権交代を「巨大組織の覚醒」として描く、ドラマチックなノンフィクションだ。政治の舞台裏で、日銀、財界、官僚たちがどのように動き、迷い、奮い立ったのか。その人間ドラマを読みたい人に強く響く一冊。本日もご訪問頂きありがとうございます。以上です！
28Aug
- LibreOffice Calcでマクロを用いて二項分布の乱数を生成する
  本日は、オープンソースの表計算であるLibreOffice Calcを用いて二項分布の乱数を生成するマクロを作って検証してみたいと思います。マクロの実行や編集の方法は次回以降にしたいと考えています。マクロの実行がどんな感じかイメージ出来ればと思っています。以下はおなじみの流れになると思いますが…。成功率=0.3、試行回数=20の二項分布に従う乱数を生成するLibreOffice Calcで実行できるマクロは下記のようになります。------------------------Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub RunSimulation() Dim oDoc As Object Dim oSheet As Object Dim i As Long, j As Long Dim Simula As Long, N As Long Dim p As Double, k As Long ' 乱数系列を時間で初期化 Randomize ' 現在のアクティブなシートを取得 oDoc = ThisComponent oSheet = oDoc.CurrentController.ActiveSheet ' パラメータ設定 Simula = 10000 N = 20 p = 0.3 ' シミュレーション実行 For i = 1 To Simula k = 0 For j = 1 To N If Rnd() < p Then k = k + 1 End If Next j ' A列（インデックス0）に結果を出力 ' Calcのセル指定は (列, 行) の順で、0から始まります oSheet.getCellByPosition(0, i - 1).Value = k Next i MsgBox "シミュレーションが完了しました。", 64, "完了"End Sub----------------------------------カットアンドペーストして頂ければ実行できると思います。マクロの実行結果を検証するために下記のようにシートに式を組みました。A列にcalcのマクロで計算した二項分布に従う乱数を10000個B列にExcelのVBAで計算した二項分布に従う乱数を10000個出力しました。E列は成功数で0～20まで値を取ります。セルF1=COUNTIF(A:A,E2)と式を組みF22までコピーします。E列の値を取るcalcの乱数の個数になります。セルG1=COUNTIF(B:B,E2)と式を組みG22までコピーします。E列の値を取るExcelの乱数の個数になります。セルH1=BINOM.DIST(E2,$E$22,$D$2,FALSE())*10000と式を組みH22までコピーします。E列の値を取る乱数の理論値になります。シートの説明はここまでです。E1:H22のデータは二項分布の度数分布表になっていてこれを元にグラフを作成するとまだセンス無い彩色かな。参考にしてください。本の紹介です。通貨に信用を刻印する　セントラルバンカーの10の提言 (日本経済新聞出版)Amazon（アマゾン）通貨に信用を刻印する　セントラルバンカーの10の提言白川方明 (著)白川方明氏には現在3冊の著作があります。1冊目は大学教員時代の教科書であり、2冊目の『中央銀行』は回顧録に近い著作でした。そして3冊目となる本作は、その1冊目の教科書の改訂にあたります。個人的には、やはり中央銀行の「債務超過」について深く切り込まれており、非常に興味深く読みました。単なる理論のアップデートにとどまらず、元総裁としての実務経験が反映された本書は、現代の金融政策の本質を問い直す、まさに今読まれるべき一冊と言えるでしょう。最新　日本酒の科学　水・米・麹の伝統の技 (ブルーバックス)Amazon（アマゾン）最新日本酒の科学水・米・麹の伝統の技 (ブルーバックス B 2310)和田美代子 (著), 高橋俊成 (監修)旧版の改訂版で監修が菊正宗の役員ということもあり、生酛（きもと）の製法解説に多くのページが割かれています。多少の宣伝色こそ否定できないものの、大好きな日本酒の話なので最後まで楽しく読み進めることができました。一方で、職人たちのこだわり抜いた製法を学べば学ぶほど、「自分にその味の違いが本当に理解できるだろうか」と、痛いところを突かれたような気持ちにもなります。単なる嗜好品としてだけでなく、水・米・麹が織りなす「科学の結晶」として、今夜の一杯をこれまで以上に愛おしく味わえそうでな１冊です。本日もご訪問頂きありがとうございます。以上です！

前ページ
次ページ