朝顔日記と健康雑記の統計(“Ｒ”などによる)「統計」

最低血圧のXバーR管理図【約１ヶ月間】：20080805

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-08-05T04:34:30+09:00

『等倍』でご覧下さい。最低血圧のここ１ヶ月間のXバーR管理図です。JUSE-StatWorks/Ver4.0を入手してJISの管理図について、にわか勉強したところ、臨床検査でいう管理図とJISの管理図では、かなり違いがあることが分かって驚きました。JISの方の管理限界は、R(範囲)の方から計算するのに対して、臨床検査の方は、Xバーのσから計算するものです(最近は変わっているのでしょうか？)。従って多くの場合、JISの方が厳しい管理限界となります。臨床検査の基準の方が、体の計測値の管理に...

成人病３項目グラフ【７年半】：2008/7/24

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-24T07:44:28+09:00

『等倍』でご覧下さい。先日受けた、メタボ検診のデータを加えて、関連する3項目の長期変動を示します。HbA1cは血糖値の、γ-GTPは私の場合、飲んでいる薬剤の影響度を、中性脂肪は摂取カロリーと消費カロリーの差の大小を反映します。γ-GTPはお酒と肝臓に影響が及ぶ薬を飲んでいない方は、脂肪肝の指標にもなります。中性脂肪の値が目立って下がったのは、体にトラブルがあって、食べる量と運動に気をつけざるを得なくなってからです。

体脂肪率の管理図【約１ヶ月】：20080723

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-23T03:15:38+09:00

『等倍』でご覧下さい。ここ１か月ほどの体脂肪率のXバーR管理図です。こちらは7/10頃を境に、値が増加に転じています。ただ、このブログの先の記事で述べたように、測定時の室温の影響が無視できないようなので、これが真の変化なのかどうか、どうすれば判定できるか考慮中です。今日(7/23)到着予定の統計ソフトをフルに使えるようになると、何とかなるかもしれません。“Ｒ”に比べると、「ライブラリ」に当たるものは少ないですが、日本語をベースにしたものなので、私には使いやすいでしょう。

体重の管理図【約1ヶ月間】：20080723

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-23T02:55:32+09:00

『等倍』でご覧下さい。ここ１か月ほどの体重のXバーR管理図です。7/7頃を境にして、体重が増加に転じたのではないかと危惧しています。67.0Kg程度に落ちつけられればと考えております。それ以上減らすと、何度も書いているように、対感染症の防御力が弱まってしまうおそれがあると思います。体脂肪率も似た動きをしていますので要注意です。

血圧・脈拍グラフ【2年2ヵ月間】：20080722

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-22T06:00:39+09:00

『等倍』でご覧下さい。２年２ヶ月間に亘る、起床時の血圧と脈拍の動きです。起きて体重を計った直後に、自動血圧計で立て続けに7回測定して、その平均値を折れ線グラフにしたものです。06/09/27前後に、測定機器と測定姿勢を変えていますので、厳密には、その前後の比較はできない建前ではありますが(笑)。春先に下がってその後、じわじわと上昇するパターンが、私の体の特徴かどうかは、来年の春先にならないと、断定しかねます。ただ、最初期の最高・最低血圧の下降は、運動を本格的に始めたことによっている...

朝顔日記【花数グラフNo.5】：20080713

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-13T06:37:59+09:00

『等倍』でご覧下さい。朝顔の花数の棒グラフNo.5です。赤の実線は、花数のおおまかな動きを取り出したものです。7/7頃から18輪程度のピークに達したかに思われますが、今まででは１日に４０輪近く咲いた事もあったので、まだ何とも言い難いです。

室温と体脂肪率【散布相関図】：20080711

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-11T08:37:20+09:00

『等倍』でご覧下さい。この直前の記事にある、室温と体脂肪率の関係のうちLag=0、つまり当日同士の比較をしたものです。直観的にも、直線的な関係がありそうなことが分かります。

気温と体脂肪率【時系列的相関係数のグラフ】：20080711

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-11T08:18:38+09:00

『等倍』でご覧下さい。ここ４４日間ほどの気温と体脂肪率(bfr)の、日付を少しずつ、ずらした(Lag)データの相関係数の棒グラフです。ずれなし(Lag=0)の時が、飛びぬけて低くなっています。日付が近い(4日以内)の相関係数も低いですが、同日の値は飛びぬけています。気温が直接的に体脂肪率の値に影響を与えているのは、かなり確かに思えます。組成計そのものに、温度補正の機能が組み込まれている可能性があります。何を補正しているのかはよく分からないのですが(爆)。

朝顔日記【花数グラフNo.3】：20080706

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-06T13:48:09+09:00

『等倍』でご覧下さい。朝顔の花数のグラフNo.3(でしたっけ(笑))です。大まかな動きを表す赤い折れ線を見ると分かるように、徐々に増えてきています。これまでは、梅雨が明けると花数が急増しましたが、今年は、そういう現象が見られるでしょうか？

体脂肪率測定について【重回帰分析】：20080703

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-07-03T05:29:45+09:00

３５日間の体重、体脂肪率(１日に３回立て続けに測定しその平均をとる)と気温、湿度(安価なデジタル式で測定)のデータから、ゆっくり変化する成分を取り除いて、日ごとの相互の関係を分析した上で、外れ値を取り除いて、体脂肪率の値を推定する式を立てると

朝顔日記【花数グラフ】暫定：20080629

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-29T05:54:00+09:00

『等倍』でご覧下さい。咲き始めから今日までの朝顔の花数のグラフです。日中、時間があれば「滑らかにした、おおまなか変動」の折れ線を加えたグラフと「交換」します、ので関心のある方はお昼過ぎにもう一度どうぞ(笑)。

体脂肪率のXバーR管理図【１ヶ月】：20080629

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-29T03:55:23+09:00

『等倍』でご覧下さい。ここ１か月の体脂肪率(体組成計による)のXバーR管理図です。この間では「異常値マーカー」のついたデータはありませんでした。体組成計を使っている方ならお分かりのようにこの程度の体脂肪率の動きは、日常的にあり得るものです。少なくとも１週間くらいの平均値(更に私の場合は朝食直前に３回連続で測ってそれを管理図用のデータとしています)でなければ、値の上がり下がりを一喜一憂してもほとんどの場合、意味がありません。

血圧のXバーR管理図【１ヶ月間】：20080629

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-29T02:43:45+09:00

『等倍』でご覧下さい。最低血圧のXバーR管理図です。以前にも書きましたが、私は最低血圧が高い、と、お医者様に言われているので、起床時の自己測定(n=7)も、最低血圧を気にかけています。お医者様の前では、日中という事もあってか、90mmHgくらいになるのですが(苦笑)。上の１か月ほどの区間では「黄色マーカー」が単独で２度出ているだけで、特段の異常傾向は見られませんが、春先に比べると、Ｘバーの方が3～4mmHg位、高くなっています。春先に血圧が落ち込むのは、昨年もでしたが、気温が、暖か...

体重グラフ【28ヵ月間】：20080624

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-24T08:58:37+09:00

『等倍』でご覧下さい。ここ２８ヶ月間の体重の変化です。２度のダイエットは減量のペースが違いましたが、今回のダイエットで、リバウンドが起こらなければ、1Kg／月ぐらいが良いと言われる事が裏付けられた事になるのですがどんなものでしょうか(嘆息)。食べすぎの傾向が弱くなっていたり、油ものに対する欲求が弱まってきたりしているのは、本当なのですが、意思が弱いから正直心配です。今度こそ、体重の管理図をきちんと使って、体重維持に挑戦いたします(公然と宣言します)。

気温と体脂肪率【相関散布図】：20080622

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-22T13:14:57+09:00

『等倍』でご覧下さい。25日間に亘る、体脂肪率と気温の関連を示したものです。片方のデータを１日ずらしてやると、相関係数が有意でなくなる(-0.18559)ので、気温が次第に上がり、体脂肪率が次第に下がっているから有意な相関係数(-0.59674)が得られているわけではなさそうです。となると気温が上がると、汗の分泌が盛んになって、皮膚の抵抗が下がって、見かけ上、体脂肪率が下がる、という可能性が無視できません。２％くらいで大騒ぎするなと仰る方も多いでしょうが、条件をそろえてデータを集めてい...

血圧・脈拍【25ヶ月間グラフ】：20080620

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-20T09:08:33+09:00

『等倍』でご覧下さい。25ヵ月間に亘る、起床時血圧・脈拍の毎日の平均値と、大まかな動きをみるための「７日移動平均値」です。大まかに言って血圧が次第に下がってきています。運動と減量の賜物と思っています。特別な栄養食品のたぐいは、まったく摂っていませんので念のため。

血圧・脈拍のばらつき【2年分グラフ】：20080609

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-09T01:19:44+09:00

『等倍』でご覧下さい。起床時血圧・脈拍のばらつきの大きさを「カルマンフィルタ」と呼ばれる手法で、滑らかにした２年分のグラフです。一見して分かるとおり、涼しい～寒い時期に大きくなっている傾向が読み取れます。血圧・脈拍のグラフでは、同じ期間にこれほどの上昇は見られませんから(特に最高血圧(max))、寒さは血圧のばらつきも大きくする、とみて良いのかもしれません。

体重の変化と脈拍【散布図】：20080605

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-05T07:25:55+09:00

『等倍』でご覧下さい。08/2/29～08/6/5までの、起床時の前日との体重差(d_wt)と、脈拍の関連性をグラフにしたものです。この関連性の強さには0.05％の有意性があります。体重が減ることがストレスになって、脈拍が増えるのか、体重が減ることは、主に体液が減ることによるのでしょうから、血液量が減って、結果として脈拍が増えるのかはよく分かりませんが、ちょっと気になる関係です。

体重のXバーR管理図【１ヶ月間】：20080601

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-06-01T08:11:30+09:00

『等倍』でご覧下さい。ここ１か月の体重のXバーR管理図です。徐々に減ってきましたが、BMI=23.4前後に落ち着けるといいなと思っています。wt=67.6Kg程度です。今までは、完全に落ち着けることが、難しかった、つまり、平均すると一定の重さなのですが、その上下を激しく行ったり来たり、ということが多かったので、その辺を何とかしたいと思っています。食べる量と、運動の量を一定にして、摂る水の量にも注意を払えば良いのだとは、分かっているのですが、なかなか難しくて……。

最低血圧XバーR管理図【1ヵ月】：20080522

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-22T08:15:51+09:00

『等倍』でご覧下さい。最低血圧のXバーR管理図です。この期間内では、異常値は確認されませんでした。厳密に言うと徐々に値が低くなっているのですが、見た目では、分からない程度です。管理図を見慣れた方なら、値が周期的に上下しているのではないかと疑われるでしょう。今のところ有意ではないのですが、もう少しこの傾向が続くなら、厳密に検定した上で、原因と対策を考えなくてはならないでしょう。最高血圧の方では、傾向がもっと顕著なのですが……。

血圧・脈拍、ここ２年間【折れ線グラフ】：20080521

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-21T02:43:00+09:00

『等倍』でご覧下さい2006/5/21～2008/5/21の２年間に亘る、起床時の血圧・脈拍の平均値(毎朝7回立て続けに計る)と、その大まかな動きを「カルマンフィルタ」と呼ばれる手法で取り出した(_TR)ものです。この２年、大まかに言って、血圧は徐々に下がってきています。春先に急降下するのが、偶然かどうかは、来年の同時期まで待たなければ分かりませんが(笑)。

血圧・脈拍、連続１時間測定生データ【フリー扱い】：20080514

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-14T09:36:01+09:00

2008/5/11(日)の、昼食(11:45AM終わり)後、さらに昼寝(13:25PM終わり)の後で、１時間にわたり約１分おきに６０回連続で、血圧と脈拍を測定した結果の生データです。学生さんのレポートの補助的な役割を果たせたら、と思うので、敢えてUPいたします。静かに座っている状況下でも、この程度は変化があるもののようです。なおTVはつけっぱなしでした。TVの内容に血圧・脈拍が、かなり影響を受けたか、と、きかれれば、答えはYesです。もっと具体的に書けないのは、記録補助員がいなかったの...

１時間血圧・脈拍連続測定、分析【残差相関図、検定】：20080513

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-13T03:25:34+09:00

『等倍』でご覧ください。血圧・脈拍の１時間連続測定のデータから、大まかな動き(トレンド)を除去した成分に、まだ関連性が残るかどうかを表示検定した図です。最高・最低血圧の関係性は大まかな動きだけですべて説明がつきそうですが、両者と脈拍の関連性は、大まかな動きだけでは説明がつかず、１回１回の測定ごとの値が、相関性を持っていそうです。ドキドキするのと血圧との関連性は、非常に短時間でもありそうですからね(嘆息)。

血圧・脈拍の連続測定、１時間【折れ線グラフ】：20080512

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-12T06:20:58+09:00

『等倍』でご覧下さい。2008/5/11(日)の、昼食(11:45AM終わり)後、さらに昼寝(13:25PM終わり)の後で、１時間にわたり約１分おきに６０回連続で、血圧と脈拍を測定した結果の折れ線グラフです。_TRというのは、その上の項目の大まかな変化を、カルマンフィルタという手法で取り出したものです。静かに座っている状況下でも、この程度は変化があるもののようです。なおTVはつけっぱなしでした。

体脂肪率のXバーR管理図【１ヶ月】：20080509

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-09T13:50:09+09:00

『等倍』でご覧下さい。体脂肪率は、22.4％～24.5％の間を行き来しており、極端な偏差値を示したデータがないので、ホッとしています。体重が下限(66.5Kg)に達した後で、体脂肪率だけを下げ続けられるかどうかが勝負ですが、現在の状況ではいささか心配です(嘆息)。内臓脂肪が低ければO.Kだとされますが、下がりきった後、しばらく様子を見なければならないでしょう。

体重のXバーR管理図【１ヶ月】：20080509

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-09T13:47:51+09:00

『等倍』でご覧下さい。体重も68Kg程度まで下がってきて、かつて、ほぼ一定に保っていた水準に近づき、BMI=23.0(66.5Kg)以下にならないように注意をしなければならなくなって、かえって気を使わなくてはいけなくて、戸惑い気味です。あと1.5Kgしかない(笑、約1ヵ月で下がってしまう分量)しかも脂肪を増やしては意味がないわけで結構大変です。タンパク質を多めに、炭水化物を少なめに、位しか思いつけない(笑)。

最低血圧のXバーR管理図【1ヵ月】：20080507

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-07T07:39:15+09:00

『等倍』でご覧下さい。最低血圧のXバーR管理図です。前日に刺身(醤油を多く使う)を食べると、最低血圧が上がる傾向があるような気がするので、これからチェックしていきたいと思います。

6万アクセス突破【御礼】：20080505

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-05T03:46:54+09:00

アクセス状況の表示で、2008/5/3から5/4にかけて、拙ブログ開始以来の累計アクセスが6万を突破いたしました。日頃から、定期的にアクセスしてくださっている皆様に御礼申し上げます。不定期にアクセスしてくださる方々にも感謝いたします。なお5万アクセス突破は昨年の12/18でした。

起床時血圧連続測定のばらつき【箱ヒゲ図】：20080504

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-05-04T06:49:44+09:00

『等倍』でご覧下さい。ここ２ヶ月(N=61)ほどの起床時血圧測定の、毎朝7回連続測定の回数別の値のばらつき(その日の平均値から)です。目立つのは、最低血圧の最初の3回が徐々に下がっていることでしょう。統計的には有意のような気がしますが、毎日の値を見ていく上では、重大な差ではないように思います。今使っている血圧計に体と心が慣れてきた、ということでしょうか(笑)。

血圧・脈拍グラフ【１年11ヶ月間】：20080421

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-21T03:59:20+09:00

『等倍』でご覧下さい。２３ヶ月間に亘る、起床時血圧・脈拍の動きです。春先の血圧低下がやはり起きたもようです。ただ、ここ３日くらいで少し逆戻りしましたが(笑)。１月下旬の血圧の低下は、部屋の暖房を少し強めにしたことによるものだと思いますから、急に寒い所へ出て血圧が上がるというのも、確かにある話だと思いました。なお、23ヶ月間、完全にデータが揃っているわけではなくて、細かく見ていただくと、欠落値があって、線が途切れているのがわかると思います(笑)。

最低血圧のXバーR管理図【１ヶ月】：20080419

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-19T08:00:13+09:00

『等倍』でご覧下さい。最低血圧のXバーR管理図です。ここ１週間ばかり値が低目になっています。気温が暖かくなってきている影響が、最低血圧の方にまで及んできた模様です。ただ、このまま低い値が続くかどうかは、ウォーキングの量も影響しそうです(笑)。

体脂肪率のXバーR管理図【１ヶ月】：20080419

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-19T07:58:30+09:00

『等倍』でご覧下さい。体脂肪率のXバーR管理図です。ここ10日間ほど、値が低目になっています。体重が低くなっていることと、気候が暖かくなっていることも無関係ではないでしょう。ウォーキングの量を、多めに保つことも肝要だと思っています。

体重のXバーR管理図【短期】：20080417

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-17T08:19:21+09:00

『等倍』でご覧下さい。体重のXバーR管理図です。±2SDが管理上下限です。4/4から体重の変動がほとんどなくなっていまたのは、偶然の範囲内だったようです。ここにきて再度、20日移動平均値が徐々に下降しているのですが、100%これが良いことかどうか、少し考えなくてはならないでしょう。先の人間ドックで、白血球数が基準値下限近かったことも考えなくてはなりません。栄養不良で免疫が低下しかねないのは承知していますから……。

体脂肪率ＸバーＲ管理図【短期(１ヶ月)】：20080412

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-12T08:31:46+09:00

『等倍』でご覧下さい。体脂肪率のＸバーＲ管理図です。普通に生活して、一定の条件で測定しても、これくらい動くものだと思ってくだされば、幸いです。3/20のデータは、明らかにおかしいのですが、理由はよく分かりません。体重とかは、特に異常値ではありませんでした。

最低血圧XバーR管理図【短期(１ヶ月)】：20080412

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-12T08:05:29+09:00

『等倍』でご覧下さい。最低血圧のＸバーＲ管理図です。私の場合、最低血圧の方が高めなので、最低血圧の方をお見せします。3/25のＲチャートのデータから、測定時、何か変だった事が推測されますが、理由は不明です。Ｘバーチャートの方での2回の2SDオーバーは、連続していないし、この程度の回数の上でならあり得る事です。

体重のXバーR管理図【短期グラフ】：20080408

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-08T08:17:50+09:00

『等倍』でご覧下さい。体重のXバーR管理図です。±2SDが管理上下限です。4/4から体重の変動がほとんどなくなっていますが、積極的な手を打っているわけではありませんので、皆さんに解説できないのが申し訳ないところです(嘆息)。体重に直結している項目以外は、特に動きが小さくなっているわけではありません。

HbA1c、γ-GTP、中性脂肪(TG)【長期グラフ(７年間)】：20080406

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-06T04:16:59+09:00

『等倍』でご覧下さい。2001年頃からのHbA1c(糖尿病の目安)とγ-GTP(脂肪肝の目安)と中性脂肪(カロリーの摂りすぎの目安)です。今回(2008/3/26)目立つのは、HbA1cがいささか上がった事と、中性脂肪が再度上昇の気配を見せていることです。ここのところ寒さのためもあってウォーキングをサボりがちであった結果が出ているのでしょう。週４日を６日位に戻すか４日でも距離をのばすか、せざるを得ないでしょう。無論、食欲の抑制は続けなければならないでしょう。ここ２０日ほど体脂肪率が...

体重グラフ【長期(9か月)】：20080405

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-04-05T08:45:20+09:00

『等倍』でご覧下さい。2008年７月１日からの体重のグラフです。青が生データ、赤がそれを多少滑らかにしたもの(７日移動平均)です。ここ２０日ほど６９．５前後に落ち着いていることが分かります。このまま、上昇に転ずる事がなければいいのですが(笑)。

体重のXバーR管理図【グラフ】：20080331

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-31T08:13:00+09:00

『等倍』でご覧下さい。体重のXバーR管理図です。BMI=24.0、つまり、体重=69.4Kg前後で落ちつけようとしています。その±2SDに、納まってくれるようになりそうです。

１日の歩数と体重変化【グラフ】：20080331

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-31T02:57:46+09:00

『等倍』でご覧下さい。１日の歩数と、その日の朝と翌朝の体重の変化とのグラフ。私が平均的に食べている量なら、4000～5000歩あるけば、体重の増減は、平均的には、±0.0Kgに抑えられるということ。ただ、人によって食べる量が違うから、各人で、こういったグラフを描いてみないと、自分のことは分からないのが残念。

血圧・脈拍、連続測定の生データ：20080325

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-25T00:36:00+09:00

血圧・脈拍、連続測定の生データ。フリーのデータとして公開します。2008/3/23(日)。7:45AM～8:45AM。1回/分。±10秒程度の誤差あり。食事7:20AM頃終わり。薬は食事直後。----------------------最高血圧,最低血圧,脈拍116,74,88116,77,88109,76,91114,78,89114,78,90109,77,90105,78,89104,80,91105,75,90...

血圧連続測定時のばらつき【ヒストグラム】：20080324

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-24T08:40:26+09:00

『等倍』でご覧下さい。3/23日に、朝食後１時間連続測定した血圧２種と脈拍の、おおまかな動き(トレンド)からのばらつきの頻度図(ヒストグラム)と、ばらつきの大きさ(標準偏差)です。血圧・脈拍が一定でも、測定のばらつきとしてこれくらいの標準偏差になるものと考えてくださってかまいません。

血圧の連続測定【折れ線グラフ】１時間：20080323

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-23T12:53:00+09:00

『等倍』でご覧下さい。朝食直後、薬を飲んで、25分後からの血圧・脈拍の１時間に亘る連続測定(1回/分)のデータを折れ線グラフにしたものです。_TRと付いているのは、カルマンフィルタと呼ばれる手法で、おおまかな動きを取り出したものです。計り始めた直後に最高血圧が高めなことと、脈拍が継続的に上昇していることが分かります。脈拍の方は、薬の副作用だろうと見当がついています。

血圧・脈拍の22ヶ月間【長期グラフ】：20080321

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-21T04:04:22+09:00

『等倍』でご覧下さい。ここ22ヶ月間の最高・最低血圧と脈拍です。上のグラフがその日、立て続けに７回はかったものの平均値とR(７回の値の幅)。下のグラフが上の値の７日移動平均値です。あと１ヶ月で(東京は)暖かくなるでしょうが、その間に、昨年のように血圧がすごく下がるかどうか関心のあるところです。

体重ＸバーＲ管理図【短期グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-20T02:16:00+09:00

『等倍』でご覧下さい。体重のＸバーＲ管理図です。順調に下がってきていましたが、薬が変わったので、激変の可能性が出てきました。＋0.5～1.0Kg位、増加しそうです。増加が継続したら、ドクターと再度相談しなくてはならないでしょう。４,５日後には、その辺が管理図上で判定できるでしょう。

血圧の毎朝測定時のばらつき【箱ヒゲ図】：20080313

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-13T07:45:57+09:00

『等倍』でご覧下さい。2008/3/13の仮報告から１か月たったので、中間報告です。2007/12/5～2008/3/13にわたって、毎日起床時、７回連続で測定した、最高・最低血圧と脈拍が、毎日の平均値からどのくらいずれていたかを示した「箱ヒゲ図」です。１回目(V1,V15)の最高血圧・脈拍の値のずれが、少し大きいという傾向がやはり見られうようです。最後の回の値が少し変な傾向も見えるかもしれません。また１ヶ月くらい経ったら、再度、データを集計して様子を見たいと思います。...

体重のＸバーＲ管理図【短期グラフ】：20080307

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-07T09:46:34+09:00

『等倍』でご覧下さい。図についてのコメントは、図に張り付けてあるものをご覧下さい。

体重グラフ【長期】：20080306

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-03-06T05:03:29+09:00

『等倍』でご覧下さい。図についてのコメントは、図に張り付けてあるものをご覧下さい。

体重のＸバーＲ管理図【グラフ】：20080229

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-29T08:40:31+09:00

『等倍』でご覧下さい。体重のＸバーＲ管理図です。１週間前に、17日頃から一段と体重が減少した、と書きましたが。今後も26日の様なリバウンドをせぬよう、食べ物と運動に注意したいと思います。また、減り過ぎは容易にリバウンドに結びつくようなので、これも注意したいと思います。

体脂肪・内臓脂肪の変動【グラフ】：20080227

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-27T04:22:39+09:00

『等倍』でご覧下さい。ここ１年２か月ほどの体脂肪重量と内臓脂肪指標の計算値と、そのおおまかな動きです。毎日の測定値計算値は、いろいろな誤差が入り込むから大まかな動きで見てやらないといけないのです。体脂肪は正月からしばらく減少が停滞していましたが、ここへ来て、再び低下しはじめています。停滞期を抜けたのでしょうか。内臓脂肪は停滞したままです。体重が停滞しているから、やむを得ないのかもしれませんが、何とか低下に持ち込みたい、せめて(9.5)にしたい今日この頃です。

連続測定時の血圧・脈拍のばらつき【頻度図】：20080225

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-25T15:38:24+09:00

『等倍』でご覧下さい。2008/2/23の夕方、１時間の血圧の変動を計った時の、データのばらつきが、どれくらいあるかを示した図【頻度図、ヒストグラム】です。最高血圧で±9、最低血圧で±7、脈拍で±5、位のずれは覚悟しないといけないようですね。バラツキの程度は、前回、早朝に計った時と比べて極端な違いは無いようです。

血圧脈拍１時間連続測定【相関図と検定】：20080225

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-25T04:20:26+09:00

『等倍』でご覧下さい。一昨日の夕食後に１分おきに１時間かけて測定した血圧・脈拍のデータをプロットしたものです。最高血圧と最低血圧の値が、ほかから飛び離れていた１回づつ、２回分をとりのぞいてありますのでN=58です。この中で関連性が特に高いのは最低血圧と脈拍です。以前の同様な分析でも類似の結果が得られていますから、これは、かなり本当なのではないかと思われます。無論、これは、私個人についてのデータなので、学生さんは、自分のデータを採って比べることをお勧めします。

血圧脈拍１時間連続測定【生データ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-24T03:36:34+09:00

今回公表した１時間にわたる血圧・脈拍の測定値です。フリーのデータとして公表します。学生さんのレポートなどの参考になれば幸いです。なお、測定間隔は『ほぼ』１分です。最大、10秒程度の誤差があるものと思ってください。

血圧脈拍１時間連続測定【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-24T03:34:34+09:00

08/2/23の夕食後１時間～２時間にかけての１時間に亘る血圧・脈拍の測定値のグラフです。血圧も脈拍も徐々に上昇していることがわかります。私は、食後に眠たくなる傾向があるのですが、血圧が下がっているためではないかと思われます。今度のチャンスには食事の直後から計ってみたいと思います。なお、今回も、生データと各々の値の相関図も公表の予定です。

体重管理図【ＸバーＲ】：20080222

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-22T08:45:53+09:00

『等倍』でご覧下さい。体重のＸバーＲ管理図です。極めて異常だった2/9,2/10のデータは、除去しました。70.1Kg付近に安定してきた、と13日に書きましたが、17日頃から一段と体重が減少したことが分かります。今後もリバウンドせぬよう、食べ物と運動に注意したいと思います。

血圧・脈拍21ヶ月間【グラフ】：20080219

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-19T05:29:55+09:00

『等倍』でご覧下さい。ほぼ、21ヵ月間に亘る血圧の変動です。毎日、起床時、７回連続で測定したものの、平均値と、最も高かった値と低かった値の幅(範囲：レンジ【R】)です。2006/9/27に、測定姿勢と血圧計を変更していますので、厳密には、その前後の比較はできないのですが……。一時低下した最高血圧が、再度上がってきていますが、部屋の気温は下げていないので、別な理由を考えなくてはならないでしょう。下の段は、上の、毎日の血圧の変動のグラフの、７日移動平均をとって、動きを滑らかにしてみたも...

体重XバーR管理図【グラフ】：20080213

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-13T17:30:37+09:00

『等倍』でご覧下さい。体重のＸバーＲ管理図です。2/9,2/10の異常は、水の飲み過ぎと下剤の服用忘れ(下剤は薬の副作用を打ち消すために飲んでいる)のためです。70.1Kg付近に安定してきているのがわかります。リバウンドせぬよう、運動にも努めたいと思います。

起床時血圧７回連続測定【グラフ、箱ヒゲ図】：20080213

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-13T04:58:00+09:00

『等倍』でご覧下さい。2007/12/5～2008/2/13にわたって、毎日起床時、７回連続で測定した、最高・最低血圧と脈拍が、毎日の平均値からどのくらいずれていたかを示した「箱ヒゲ図」です。データの量がすくないためか、これまでみられた、１回目(V1,V8,V15)の値のずれが、特に大きいという傾向が見られません。この傾向が続くなら、睡眠時の室温を温かくしたことの影響か？などと言えるかもしれませんが、本当のところ、よくわかりません。また２ヶ月くらい経ったら、再度、データを集...

今までのアクセス数【グラフ】：20080211

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-02-11T04:18:09+09:00

詳しくは図内コメントをご参照ください。

血圧・脈拍の連続測定でのバラツキ【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-28T03:46:17+09:00

『等倍』でご覧下さい。2008/1/6の早朝、１時間の血圧の変動を計った時の、データのばらつきが、どれくらいあるかを示した図【頻度図、ヒストグラム】です。最高血圧で±10、最低血圧で±8、脈拍で±7、位のずれは覚悟しないといけないようですね。

血圧の変動【約20ヵ月間】：20080118

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-18T01:55:00+09:00

『等倍』でご覧くださいほぼ、20ヵ月間に亘る血圧の変動です。毎日、起床時、７回連続で測定したものの、平均値と、最も高かった値と低かった値の幅(範囲：レンジ【R】)です。2006/9/27に、測定姿勢と血圧計を変更していますので、厳密には、その前後の比較はできないのですが……。ここのところ部屋の暖房の設定温度を１度上げたところ、血圧に影響があったもようです。詳しくは平均の平均を示した、下のグラフをご覧下さい。

１時間血圧・脈拍【生データ】：20080112

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-12T05:28:00+09:00

先日公表した１時間にわたる血圧・脈拍の測定値です。フリーのデータとして公表します。学生さんのレポートなどの参考になれば幸いです。なお、測定間隔は『ほぼ』１分です。最大、10秒程度の誤差があるものと思ってください。

血圧と脈拍の関係、連続測定時【グラフと検定】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-08T16:37:26+09:00

『等倍』でご覧下さい。１時間にわたって連続測定した血圧と脈拍について、その関係を探ったグラフです。脈拍と関係が深いのは、最高血圧から最低血圧を引いた数字であることがわかりました。見た目では、最低血圧と脈拍の関係も、同じくらい強そうですが、例外の点が３つほどあり相関係数の上昇を妨げています。これらは、いずれも脈拍が高いのですが、その割に最低血圧が低くなっています。これらは、連続測定の終わりごろに集中して現われており、何らかの測定エラーであることが否定できません。これら３つを取り除くと最低...

血圧・脈拍の連続測定【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-06T08:59:26+09:00

『等倍』でご覧下さい。今朝早く、１時間かけて１分おきの、最高・最低血圧、脈拍を、連続的に測定したグラフです。最高血圧が徐々に低下し、脈拍が、後半、徐々に上昇しています。『TR』とついているのが、大まかな変化を、カルマンフィルタ、と呼ばれる手法で取り出したものです。最低血圧には、変化が認められませんでした。連続測定で、この程度ばらつくのですから、毎日１回の測定では若干不安になる気持ち、分かっていただけますか(笑)？

体重グラフ【ダイエット、管理限界線入り】：20080103

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2008-01-03T15:17:22+09:00

『等倍』でご覧下さい。管理限界の目標を示した、ダイエットグラフ(体重)です。2007/12/30を除いた体重の数字で、２．５σ(シグマ)の管理限界線を引いています。大晦日から新年にかけて体重の減少が足踏みしていることが、一目瞭然です。特に、今日(2008/1/3)の朝の体重は、上方管理限界を超えていますから、今日明日は、しっかりと食事制限しないと、えらいことになりそうです。昼飯までは、しっかり食べてしまいましたから、夕食が、寂しいものになるのは避けられないでしょう。それで、明日...

前の記事の訂正……

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-27T12:49:09+09:00

最高・最低血圧の差と、脈拍との相関係数は、仰向けで、+0.075位ですから、差と脈拍は正の相関関係があることになります。統計的に有意かどうか、ギリギリのところです。座位では、-0.12～-0.14位で、負の相関関係があることになります。こちらは、かなり積極的に主張できる有意さです。

最高・最低血圧の差と脈拍の関係

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-27T04:50:50+09:00

起床時に、７回立て続けに血圧・脈拍を測定していると、なんとなく実感されるのですが、最高・最低血圧の差が大きいときは脈拍が少ないような気がしていました。

血圧、１年７ヶ月間【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-22T23:39:12+09:00

『等倍』でご覧下さい。計り始めてから１年７ヶ月間の血圧の動きです。『平均』の方は起床時７回連続測定の平均値ですから、１回しか測らなければこの２．６倍くらい、ばらつくはずです。2006/9/27頃に、測定姿勢変更～仰向け→座って、と、血圧計を新しくしていますから、それから後だけ見ると、秋から冬にかけて、血圧が漸増しているように見えますが、年周期があるかどうかは来年の春、暖かくなったころ、血圧が低下しないと、なんとも言えません(笑)。

アクセスの多かった記事(2007/12/21朝現在)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-21T08:23:54+09:00

５万アクセスを記念して、今までの記事の中で、アクセスの多かったもの(300アクセス以上)を、列挙しておきます。------------------------------------------------写真の集合体を作れるフリーソフト2006/6/28329アクセス

血液検査の結果【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-21T01:13:48+09:00

『等倍』でご覧下さい。ここ７年間の、HbA1c(血糖の長期的な指標である検査項目)、γ-GTP(肝臓の傷められ具合の指標である検査項目)、中性脂肪(カロリーの摂り過ぎと日頃の運動の熱心さの指標)、のグラフです。

１年１０ヶ月間の体重変化【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-12T14:56:41+09:00

『等倍』でご覧下さい。約１年１０か月間にわたる、体重の変化です。2005年の10月頃は81キロあったので、ＢＭＩで25付近、体重で72.3キロ付近に抑えていられれば、上出来なのでしょう。負け惜しみかな(笑)。

体脂肪重量が減少に転じた【グラフ】

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-06T11:20:05+09:00

『等倍』でご覧下さい。

７回連続測定時の血圧・脈拍の変動

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-04T06:30:00+09:00

『等倍』でご覧下さい。朝起きた時に、７回連続して測定した、最高・最低血圧・脈拍が、その日の平均値からどの程度隔たりがあったかを見ている「箱ヒゲ図」です。V1～V7が最高血圧、V8～V14が最低血圧、V15～V21が脈拍です。最高血圧は１回目が、最低血圧は１～２回目が、脈拍は１～２回目と７回目が、平均からずれているようです。有意差と言えるかどうかは、最高血圧の１回目を除いては疑問があるのですが、大勢のデータを処理する場合、５回計って、その３，４回目の平均をとるくらいの用心がいるか...

統計(直前の記事のデータを見る“Ｒ”code)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-04T06:29:10+09:00

この寸前の記事をファイルにしたら、“Ｒ”を起動して、以下の「Ｒ code」を「Ｒ console」に、コピー and ペーストしてみてください。次の記事の箱ヒゲ図の横並びが出るはずです。----------------------------------------x<-read.table("c:\\BP\\bpp",sep=",")y<-t(x)z<-matrix(rep(0,21*268),nrow=21,ncol=268)for(i in 1:268){a<...

統計(血圧データ【異常値除去済み】)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-12-04T06:27:25+09:00

起床時に、立て続けに７回測定した、最高血圧、最低血圧、脈拍について、同じ日の中での変動がどうであるかを、“Ｒ”を使って見るためのデータです。(c:\)ドライブの(BP)ディレクトリ「(c:\BP\)」に、「bpp」というファイル名で、点線より下の、数字とコンマを登録して下さい。----------------------------------------------109,106,108,109,107,104,98,73,71,77,74,78,72,75,73,82,85...

体重の変化：増加し続け！：グラフ

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-30T11:07:51+09:00

『等倍』でご覧下さい。2007/7/1からの体重の変化です。

“Ｒ”の参考書

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-15T08:08:25+09:00

“Ｒ”の参考書は、いろいろあるのだけれど、私が統計数理研究所の公開講座で“Ｒ”を習った時の先生である、金明哲さんの「Ｒによるデータサイエンス」(森北出版)は、統計学の基礎＋αくらいの知識のあるパソコンのユーザー（PC経験中程度）には向いている本です。ただ若干誤植が目立つのですが、ホームページの方でフォローしているそうです。ただなにせ高い(3600+税)けれど、“Ｒ”の本は軒並み高いからなぁ(嘆息)。

統計_07_005（Ｒ code）

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-14T13:19:29+09:00

この前のデータを「ｃ」ドライブの下の「BP」ディレクトリに「bp_day_av」という名前のファイルにした上で、点線以下を、点線の区切りごとに「Ｒ code」ウィンドウにペーストします。【点線は入力しない】--------------------------------#データの読み込みx<-read.table("c:\\BP\\bp_day_av",header=T)#散布図(相関図)の出力plot(x)-----------------------------...

血圧・脈拍の相関図にもちいたデータ（フリーのデータとします）

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-14T08:23:56+09:00

先の血圧・脈拍の相関図に用いたデータ（平均値にしたもの）です。“Ｒ”で、いろいろな分析をしてみたい方のための「フリー」のデータとして公開します。最初が(2007/4/1)です。起床時に７回連続測定した値によるものです。

最高・最低血圧、脈拍の分布図：グラフ

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-14T05:30:16+09:00

『等倍』でご覧下さい。2007/4/1～2007/11/14のその日、立て続けに７回計ったデータの平均値による、最高血圧、最低血圧、脈拍、の関連性の図です。欠測の日があるのでｎ＝223、です。

アクセス数の曜日依存性の有無

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-12T09:21:00+09:00

毎日のアクセス・レポートで、アクセス数の平均値に大きな曜日差があるかどうか検討したのですが『大きな』差は見られませんでした。ただ、日曜日に少なく月曜日に多いことが分かりましたが、アクセス数としては２割くらいの差しかありませんでした。

統計_07_003(血圧等の連続測定における変動)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-07T08:57:17+09:00

先日の血圧等のファイルを読み込んで、各日の何回目に計ったかによって分けた『箱ひげ図』を出力するものです。最高血圧(3つに分かれた左側)の1回目が高めになっていることが分ります。これは昨年と、ほぼ同様の結果です。血圧を測っている方で、時間に余裕のある方は、自分でも、似たような結果が出るかどうか、2週間くらいにわたって、毎日、立て続けに7回測定するのも面白いかと思います。------------------------------------x<-r...

このブログの統計“Ｒ”用codeはフリー扱いでいいです

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-05T09:53:56+09:00

タイトルの通りです。ただ常識的に扱って下さいね。

統計_07_002(血圧等、グラフ化)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-05T09:27:43+09:00

点線より下を『Ｒ code 窓』にコピー and ペーストして実行すると、(“c:\BP\”)に作った(“bp_k7.txt”)があれば、最高血圧・最低血圧・脈拍のデータを『１日連続７回測定の平均』をとって『７日移動平均』して『標準化』したグラフが表示されます。カラーです。『標準化』してやることによって、様々な項目の平均値やバラツキの大きさが異なるデータを、類似の基準で眺める事ができるようになります。ただ常識的には３項目くらいが限界でしょう。--...

統計_07_001(血圧・脈拍、生データ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-11-05T09:26:00+09:00

点線より下を(“c:\BP\”)というディレクトリに(“bp_k7.txt”)という名前で、数値文字ファイルとする。

各種測定項目の分類(体重、etc)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-08-25T11:12:00+09:00

2007/8/1～8/25の

アクセス時刻の分布

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-03-17T11:59:13+09:00

『等倍』でご覧ください。このブログへの、アクセス時刻の分布です。2006/6/17～2007/3/16についてのアクセスレポートから作成したものです。このブログへのアクセスは、健康と朝顔の両日記のUPのタイミングを除けば、特別な点はないでしょうから、午前５時～午前８時の凹みは、どこでも起こっていることかもしれませんね。

wt2用、Ｒ_code(バグ取り後)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-21T05:31:00+09:00

x1)&(sitac_old0){sitac1){uefg1)&(uec_old>0)){lines(c((i-1),i),c(yuec[(i-1)],yuec[i]),col=3,lwd=2)}if(uec1)&(sitac_old2.7){sitacovfg[i]0){sitac1){uefg1)&(uec_old>0)){lines(c((i-1),i),c(yuec[(i-1)],yuec[i]),col=3,lwd=2)if (abs(yuec[i])>2.7){...

BPmax用、Ｒ_code(バグ取り後)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-21T05:30:00+09:00

バグのお詫びと体脂肪重量の管理図(decision limit cusum 法)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-21T05:10:00+09:00

以前公開した『Ｒ code』に、えらいバグがあったので、今日(2007/2/21)中に改訂版をUPする予定です。『date』が予約語だった上に、未定義のまま使っていました。ワークエリアが全く空白の状態で作動させるなどすると、エラーとなったはずです。まことに申し訳ありませんでした。

下４つの記事のサンプルグラフ：解説あり

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-14T15:09:00+09:00

『等倍』でご覧下さい。下４つの記事のデータと『Ｒ code』で作った『decision limit cusum 管理図』です。『Ｒ code』の１行目にある、読み込むファイル名を変えることで、かなり広範に適用できると思います。使い心地が悪い点を指摘していただければ、改善版を作りますので、コメントしてください。カラーによる表現を使っていますのでその点、御了承ください。黒の細い実線が、管理すべきデータ。緑のやや太い実線が上方CuSum。青のやや太い実線が下方CuSu...

BPmax(最高血圧データ：R code用)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-14T15:06:01+09:00

点線から下を（"c:\kenko\"）というディレクトリに（"BPmax"）という名前で、数字のファイルとして登録してください。

wt2(体重データ：R code用)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-02-14T15:06:00+09:00

点線から下を（"c:\kenko\"）というディレクトリに（"wt2"）という名前で、数字のファイルとして登録してください。

朝顔花数。グラフを滑らかにしようとする試み。

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2007-01-29T03:44:12+09:00

2006年の朝顔の花数のグラフ(細い線)と、それを滑らかにしようとした線(太い線)です。6/24(最初)から9/1頃までは周期的に増減しているようですが、統計的に、その傾向を取り出すことは出来ませんでした。主に、初めの頃、花数０(ゼロ)が何回も出ているからです。

統計_028(_027、グラフ見本)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-28T02:54:07+09:00

下(統計_027)の記事で作ったグラフです。動作確認のために『等倍』で、ご覧下さい。グラフの下の説明は『ペイント』で付けたもので、『R_code_009』には含まれていません。

統計_027(R_code_009)：平滑化と標準化：白黒

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-28T02:52:58+09:00

点線より下を『Ｒ code 窓』にコピー and ペーストして実行すると、以前に(“c:\BP\”)に作った(“k_dx7.txt”)が残してあれば、最高血圧・最低血圧・脈拍のデータを『１日連続７回測定の平均』をとって『７日移動平均』して『標準化』したグラフが表示されます。白黒です。『標準化』してやることによって、様々な項目の平均値やバラツキの大きさが異なるデータを、類似の基準で眺める事ができるようになります。ただ常識的には３項目くらいが限界でしょう...

統計_026(_024、025、のグラフ見本)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-25T05:33:46+09:00

『等倍』でご覧下さい。“統計_024(最高・最低血圧：生データのうち公式記録分)”“統計_025(R_code_008)：白黒、カラー編はなし”で作った『濃度･等高線表示の図』です。データと『R_code_008』が正常作動したかどうかの確認のためにご覧下さい。

統計_025(R_code_008)：白黒、カラー編はなし

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-25T05:32:24+09:00

x<-read.table("c:\\BP\\max_and_min_nama.txt",sep=",")a<-matrix(c(rep(0,200*200)),nrow=200,ncol=200)for (i in 1:1526){q<-x[i,1]r<-x[i,2]a[q,r]<-a[q,r]+1}b<-matrix(c(rep(0,60*45)),nrow=60,ncol=45)for (i in 81:140){for (j in 56:100){q<-...

統計_024(最高・最低血圧：生データのうち公式記録分)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-25T05:31:38+09:00

私の最高血圧・最低血圧の公式記録された生データ。(“c:\BP\”)なるディレクトリに(“max_and_min_nama.txt”)という名前で点線より下を、数値文字ファイルとする。そのファイルは、次の(上の)記事“統計_025(R_code_008)：白黒、カラー編はなし”の「Ｒ code」で濃度表示＋等高線表示の図とする事ができる。

統計_023(グラフ見本：血圧･脈拍の長期変動)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-15T02:45:00+09:00

前の記事によって作成したグラフです。白黒とカラー版の２つを載せます。『等倍』でご覧下さい。「Ｒ」がきちんと走ったかのチェックにご利用下さい。

統計_022(R_code_007)：カラー

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-15T02:43:14+09:00

x<-read.table("c:\\BP\\max_min_pulse.txt",sep=",")d<-as.Date(x[,1])a<-matrix(c(rep(NA,206*2)),nrow=206,ncol=2)b<-matrix(c(rep(NA,206*2)),nrow=206,ncol=2)c<-matrix(c(rep(NA,206*2)),nrow=206,ncol=2)a[,1]<-x[,2]b[,1]<-x[,3]c[,1]<-x[,4]...

統計_021(R_code_006)：白黒

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-15T02:42:15+09:00

統計_020(血圧等_04)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-15T02:34:55+09:00

日付つきの最高血圧・最低血圧・脈拍の各日平均値。(“c:\BP\”)なるディレクトリに(“max_min_pulse.txt”)という名前で点線より下を、数値文字ファイルとする。これは、次の(上の)記事“統計_021(R_code_006)：白黒”あるいは“統計_022(R_code_007)：カラー”の「Ｒ code」でグラフ化する事ができる。

統計_019(統計_009(R_code_001))訂正済み

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-14T02:09:01+09:00

median.na<-function(x){y<-na.omit(x)n<-length(y)if (n==0) a<-NA else a<-median(y[0:n])a}a<-NAb<-13c<-c(1,2,3,4,5)d<-c(1,2,3,NA,4,5)e<-c(NA,NA,NA,NA,NA)median.na(a)median.na(b)median.na(c)median.na(d)median.na(e)mean...

統計_018(統計_008(matplot))訂正済み

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-14T02:09:00+09:00

この前の「統計_007(体重)」という記事のデータの登録が終わったら、「Ｒ　console」プロンプト『左端の(＞)と(＋)』に対して、点線より下のように入力していくと、プロンプトのない行が出力され、最終的にグラフィックウィンドウがひらき３色の実線のグラフが描かれるはずです。赤が７日移動中央値、緑が７日移動平均です。黒は元の体重のデータ。注意深く見るとグラフの黒い実線はところどころ飛んでいることが分かります。単に本当に作動するかどうか見たい方は、この後の「統計_009(R_code_0...

間違いの訂正のお知らせ

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-14T02:08:27+09:00

このブログの『統計_008』と『統計_009』に、重大な誤りがありました。NAを含むデータの平均を計算すべき関数の定義・その他が中央値をとるものと入れ替わっていました。お詫びして、この上の『統計_018』と『統計_019』に投稿しなおしておきます。

統計_017(R_code_005)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-10T13:23:54+09:00

#白黒・点線x<-read.table("c:\\BP\\waip.txt",sep=",",header=T)k="平滑化した体重・血圧・脈拍"matplot(x,type="l",lty=1:4,col=1,ylim=c(-3,6),main=k,lwd=1.5)legend(1,6,colnames(x),col=1,lty=1:4,lwd=1.5)

統計_016(血圧等_03)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-10T13:23:00+09:00

点線以下は、2006年12月9日の『体重・血圧・脈拍』のグラフを“Ｒ”で作るためのデータ。（“c:\BP\”）に（“waip.txt”）という名前で数字テキストファイル（ヘッダ付き）とする。

統計_015(R_code_004)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-04T02:04:26+09:00

ww<-function(a){y<-na.omit(a)n<-length(y)if (n==0) a<-NA else a<-y[0:n]a}x<-read.table("c:\\BP\\k_dx7.txt",sep=",")y<-as.matrix(x)a<-y[1:196,1]aj<-ww(a)jqq<-NAqq<-matrix(c(rep(0,7*31)),nrow=31,ncol=7)qqfor(h in 1:7){a<-...

統計_014(R_code_003)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-04T02:03:27+09:00

x<-read.table("c:\\BP\\k_dx7.txt",sep=",")boxplot(x[,1:7])

統計_013(血圧等_02)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-12-04T02:03:12+09:00

点線より下を(“c:\BP\”)というディレクトリに(“k_dx7.txt”)という名前で、数値文字ファイルとする。

体重のグラフ・トレンドの抽出

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-19T15:12:36+09:00

８月中旬から１１月中旬までの、毎日の体重と、それを本格的な方法で平滑化した『トレンド』の変化です。『等倍』で見てください。

統計_011(日次平均)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-13T03:01:01+09:00

まず前の記事「統計_010(血圧等)」のデータ部分を「BP」にテキストファイル「ketuatu.txt」として登録した上で・・・。以下の点線より下の行で、先頭に「＞」と「＋」にある行を「Ｒ console」に入力してください。行先頭の「＞」と「＋」は入力の必要はありません。行先頭に「#」がある行は「注意書き」ですので入力の必要はありません。前回と同じく動作だけ見たい方は次の(上の)記事「統計_012(R_code_002)」を「Ｒ console」にコピー・アンド・ペースト...

統計_012(R_code_002)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-13T03:01:00+09:00

mean.na<-function(x){y<-na.omit(x)n<-length(y)if (n==0) a<-NA else a<-mean(y[0:n])a}u<-function(i,j){a<-abc[i:(i+6),j]a}abc<-read.table("c:\\BP\\ketuatu.txt")gg<-matrix(c(rep(0,175*3)),nrow=175,ncol=3)for(i in 1:175){k<-(i-1)...

統計_010(血圧等)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-13T03:00:00+09:00

点線以下は、起床時に７回連続して測定した最高血圧・最低血圧・脈拍の生データです。今回はこれの毎日の平均のグラフを描きます。まず、このデータ(点線より下)を(c:\BP\ketuatu.txt)なるファイルにしてください。--------------------1229078111837610987761088574103827710782751138579118847611280711208970...

統計_009(R_code_001)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-06T03:19:00+09:00

統計_008(matplot)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-06T03:18:00+09:00

統計_007(体重)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-06T03:17:00+09:00

点線より下の数値とNAからなるデータを(c:\BP\)に(taizyu.txt)という名前のファイルとします。次の記事で、欠測値のある時系列データの「移動中央値(メディアン)」と「移動平均」をグラフ化する方法を示します。-----------------------------------------------75.475.375.374.774.874.774.874.874.874.774.774.974.674.1...

統計_004(Ｒ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:28:02+09:00

「max.txt」、「min.txt」、「p.txt」の３つのファイルが出来たら、適当なサイトで『Ｒ　統計』で検索して、統計用フリーソフトウェア『Ｒ』をダウンロードしてインストールする。さまざまなバージョンがあるが、私がここで使っているのは『バージョン 2.20.51006.0』である。ただし、日本語向けの変更が加わっている部分変更版である。日本語機能は使えたほうが便利であるので、日本語向けの処置が施してある版をダウンロードするにこしたことはない。ダウンロード先について、長期に...

統計_005(ｂｏｘｐｌｏｔ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:28:01+09:00

先の３つのファイルが出来『Ｒ』のダウンロードが済めば、とにかく実際、使ってみよう。

統計_006(ｍｅａｎ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:28:00+09:00

まず「max.txt」を、read.table を使って max に読み込む。

統計_001(ｍａｘ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:27:02+09:00

記事最下部の数値データ文字列（コンマを含む）を、マウスで始めから終わりまで印をつけ（ドラッグし）コピーし、

統計_002(ｍｉｎ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:27:01+09:00

82,92,73,64,79,65,81,78,70,78,78,76,72,67,78,9088,89,75,68,80,68,77,71,71,77,73,74,71,67,74,9589,84,73,72,78,68,73,74,71,75,82,70,74,68,75,8683,85,74,70,78,67,78,75,69,77,81,65,75,67,77,9388,85,78,73,76,67,81,75,72,73,74,68,75,67,81,91...

統計_003(ｐ)

朝顔日記と健康雑記の統計(“Ｒ”などによる) — 2006-11-01T02:27:00+09:00

87,81,75,79,67,74,72,80,86,71,71,75,69,70,76 ,7682,82,74,71,66,79,68,78,78,74,70,77,68,77,80 ,7681,78,75,71,63,90,71,76,85,83,71,76,74,76,77 ,7687,77,74,87,66,72,77,73,76,78,75,72,71,72,77 ,8081,81,78,75,66,78,73,78,95,78,75,77,71,84...