ホーム 美 ダイエット成功後、その体型を2年以上維持し続けられた方へ質問 このトピを見た人は、こんなトピも見ています こんなトピも 読まれています レス 20 (トピ主 0 ) さいか 2006年2月7日 01:19 美 雑誌のダイエット特集などが色んな雑誌に掲載され、 ダイエットが大流行です。 私の周りにもダイエットをしてる子がたくさん。 でも、その時ダイエットに成功しても、 みんな気づけば元の体型に戻っているんです。 数ヶ月、下手すれば1ヶ月で元通り。 そして、数ヵ月後新たなダイエット方法を探し出す。。。 その繰り返し。 そこでダイエットに成功された方へ質問です。 ・成功したダイエット方法は? ・理想体重達成後も、食事制限は厳しいですか? ・理想体型後の生活(食事制限以外)に気をつけてることは? ・今も必ず続けていることなどありますか?
「ゆりやんレトリィバァも行ない成功した糖質制限ダイエットは本当に痩せるの?」 「リバウンドは?」 その疑問にお答えしましょう。 結論から言うと、糖質制限のみのダイエットはリバウンドします! リバウンドの原因はダイエットが終わったあとに、元の食事に戻すからです。 健康面を考慮すると糖質制限を一生行うことはできません。 ダイエット終了後の食生活の戻し方を間違えると最悪の場合、 砂糖依存症 に陥ることもあります。 今まで過度に糖質を抑えていたのに、たった1つの菓子パンやドーナツを食べたことにより欲望が弾けてドラッグをやめられない薬物依存患者のようになってしまったという事例も。 こうなってしまったら自力で治すことは不可能です。 しっかりと知識がない状態で糖質制限ダイエットを行うのはとても危険!
質問日時: 2007/09/25 20:36 回答数: 3 件 こんにちは。私は最近過食というか仕事が変わってから、以前は一日中動きずめの仕事で毎日休みもなくふらふらで、でもあんまり食べていなくて162センチで一時期47キロ位に落ちてしまい、それでも食べるようになってからは51キロ位に落ちついていましたが、今は仕事が変わり休みも増えて、毎日菓子パン5個やどーなつ7個などありえないくらい食べていたら(もともと食べるのは好きなので。普通の食事プラスです)やはり54キロ位になってしまい体が重いです。普通の人よりかなり食べています。というかお腹が空いてなくても食べてしまうので、ダイエットというかまず3食正しく食事するだけでも違いますかね?自分でもこんなに過食しなければ特に食事制限しなくてもかなり太ることはないのでは?と思っていますが・・・いつもいきなり運動して食べなくてで多分その反動でたべてしまうので。甘い物とか控えるだけでも違いますか?? No. 2 ベストアンサー 回答者: tamaki-78 回答日時: 2007/09/26 14:58 >甘い物とか控えるだけでも違いますか?? 確実に違います。案ずるより産むが安し。まずは毎日の菓子パンをやめましょう。 おそらく癖になっているでしょうから、意思の力だけでは心もとないので、まずは1週間、お財布に余計なお金は一切入れずに外出しましょう。できるなら財布を持たない事がベスト。 一週間後には、なぜ菓子パンを食べたい衝動を抑えることができなかったのか、逆に不思議に思えていますよ。 2 件 この回答へのお礼 回答ありがとうございます。おそらくただ癖になっているだけかもしれませんね。そんなに食べたい!ってわけではなく食べている部分もあるので・・今日は食べてません。ありがとうございました! ダイエット後に普通の食事に戻すのが難しい３つの理由 - のぶひろぐ. お礼日時:2007/09/26 18:23 No. 3 ribbon2525 回答日時: 2007/09/26 17:32 こんにちわ!
いったん,テーブルに変換 目的は空白のセルのみにするためだ.列数は48.最後の列48にフィルターをかけて空白のみを抽出する.336行抽出された.なんだ,ほとんど全部じゃないか. フィルターで空白セルを抽出.336行抽出された これは,悪手だ データの殆どを手動で直すなんて馬鹿げている.何か他の方法を探そう. 最初にスペースをタブに置換した時を思い出せ マイナスのついた数字があったな?あれが鍵だ.こういう時に正規表現で置換できるといいんだが. もう一度,実データを見直す 迷ったら現場に立ち返る 一晩考えた後,くだんの PDF ファイルを見直す.マイナスの後,rm 列のところが空欄になっている.メモ帳に貼り付けたデータではマイナスの直後に数値が来ている.ここにヒントがあった. マイナスの後にスペースを付け足せばよいのでは? Word で ファイルを開く.「ホーム」タブの「編集」から「置換」を選んでクリック. 「検索する文字列」には半角のハイフンをキーボードから入力する. 「置換後の文字列」は「特殊文字」から「検索する文字列」を選ぶ 「置換後の文字列」に「特殊文字」から「検索する文字列」を選ぶ.同じ文字列で置換してどうする?と思うかも知れないが,これは正規表現エンジンにも実装されている重要な機能だ. さらにキーボードから半角スペースをタイプする.ダイアログはこうなる.「^&」の後に「スペース」があるのがミソだ. さくらの満開日 前線マップ（リアルタイム／過去） | 生物季節観測データベース. 「置換後の文字列」には「^& 」と入る 「全て置換」をクリック.1872件置換された. 置換結果は1872件 スペースをタブで置換 次はスペースをタブで置換する.「検索する文字列」に「特殊文字」から「全角または半角の空白」を選ぶ 「検索する文字列」に「特殊文字」から「全角または半角の空白」を選ぶ 「置換後の文字列」は「特殊文字」から「タブ文字」を選ぶ. 「置換後の文字列」は「特殊文字」から「タブ文字」を選ぶ ダイアログとしてはこうなる. 「検索する文字列」「置換後の文字列」それぞれ指定した状態 「全て置換」すると 15, 133 件が置換された. 置換されたスペースは15133件 何とかデータの位置は揃ってきた.しかし… 相変わらず地点とデータのブロックがずれているのは直っていないが,だいぶマシになってきた.EXCEL で開くと,ところどころ先頭の位置がずれている行がある.
txtファイルには要注意だ. txtファイルを開く時のダイアログ.スペース区切りのテキストファイルには要注意だ. データの区切り位置がずれる! もうね,呆れて何も言えない.言えないが,言わせてもらう. データ区切りの縦線を手動で引いていく.途中で位置が合わなくなっている こんな不揃いのデータを公開して,恥ずかしくないのか? せめて ファイルにしてくれ.マシンリーダブルであるというのは,そういうことだ.ダウンロードしたらすぐ Excel で開いてデータベースに取り込みたいんだよ,こっちは.何なら直接データベースに突っ込みたい. この手の官僚仕事にはうんざりしている. Wordで置換してみたら? ふと,Word の置換を使えばいいのではないかと思いついた.スペースをタブに置換してやればよい.物は試しだ. 気象庁のサクラ開花日のテキストファイル – Hymn. Wordの置換.あいまい検索をオフにする.半角全角スペースというのがリストの一番下にある ビンゴ! 14, 000個以上のスペースがタブに置換された 行けそうな気がしてきた.そのままテキストファイルで保存.Excelに戻る. さっきよりはだいぶ良い.データの先頭が揃っている マイナス記号が先頭についているデータもあるが,何とかなるだろう. EXCELで開く.多少不揃いな箇所もある.これは手動で直すか考えどころ データの位置がまるごとずれている ワークシートをスクロールしていって,はたと考え込んだ.番号地点の右側,何もデータのない箇所が複数ある. ファイルを開くとデータの位置がまるごとずれている これはどうしたものか?結論から言うと,直下の領域を丸ごとカットアンドペーストすればよかった.なんでこうなったのかよく分からないのだが. 空白行を削除 空白行をまとめて削除する.ここらへんは機械的な作業だ.サクサク済ませる. マイナスを削除する マイナスの付いたところ,どうせデータベースには入らないんだから削除しよう.置換で一括削除する.1864件. マイナスはデータベースで言うところのNULL.不要なので一括削除 1864件削除された データのズレ,手動で直すか? さっきマイナスの付いていたデータでセル位置がずれている.データは400件近くある.手動で直すのは大変だ. さて,どうする?ワークシートの一番右側に注目する.ずれている行は列の最後のデータが欠損している.ここを抽出すれば良さそうだ.
プロジェクトホームページ Copyright 2014-2021, Asanobu KITAMOTO, National Institute of Informatics. なお本サイトのコンテンツのうち、気象庁防災情報XMLに関連し、かつ他サービスとのマッシュアップとなっていない部分については、 クリエイティブ・コモンズ・ライセンスの表示4. 0 国際 により利用できます(ご利用のデータベースの名称を表示)。
気象庁では、全国の気象官署で統一した基準によりさくら・うめの開花した日、かえで・いちょうが紅(黄)葉した日などの観測を行っています。 観測された結果は、季節の遅れ進みや、気候の違いなど総合的な気象状況の推移を把握するのに用いられる他、新聞やテレビなどにより生活情報のひとつとして利用されています。 なお、植物季節観測の多くは、観察する対象の木(標本木)を定めて実施しています。 注)末尾に が付加されているものは 気象庁ホームページ() 内のページへのリンクです。 特に関心の高いさくらの開花情報等についてまとめています。 今年のさくらの開花・満開の観測状況(全国) 過去のさくらの開花・満開の状況(全国) 観測開始1953年まで遡って閲覧可能です。 さくらの開花・満開の平年値(北海道) 平年値は1981~2010年の30年間の平均値です。 観測官署 稚内 旭川 網走 札幌 帯広 釧路 室蘭 函館 さくら開花 5月14日 5月5日 5月11日 5月3日 5月4日 5月17日 5月6日 4月30日 さくら満開 5月17日 5月7日 5月14日 5月7日 5月7日 5月20日 5月11日 5月4日 生物季節観測の情報
8になる日が予想開花日となります。 複雑なので、ざっくり言うと、こんな計算式です。 (1)花芽が成長を始める日を特定する (2)気温から花芽の成長量を推定する 魔法の数字「23. 8」 この式はもともと、大阪府立大学の青野靖之准教授たちが1989年に発表しました。その後、何度か改良されています。 (1)は「休眠打破する日」で「起算日」と呼びます。その地点の緯度や海からの距離、それにその年の冬の気温で補正します。 (2)は「温度変換日数」という値を使います。花芽の成長量を1日の平均気温から推定する値です。 青野さんたちが、過去の桜の開花日や気温など様々な条件を踏まえて検討した結果、この温度変換日数を足したものが「23.8」になる日を開花日とすれば、全国どこでも予想できるということを論文で発表しています。 大阪府立大学の青野靖之准教授 気象情報会社も利用!? 気象庁 桜 開花日 過去 東京. 2009年まで開花予想を発表していた気象庁も青野さんたちの論文を参考にしていました。 予想を発表している気象情報会社などのホームページの一部には、この計算式を採用していることが明記されていたり、参考文献としてこれらの論文が載っていたりしています。 最近はさらに発展させ、ビッグデータを用いてAI(人工知能)で予想している会社もあります。各社が独自に様々な改良を加えていっているようです。 計算してみました そこで、青野さんに教えてもらいながら、今年の開花予想を計算してみました。 ここから先は、ちょっと複雑な数学の知識が必要になるので、数式を一部省略して紹介します。 まず、「休眠打破」が起きた日を突き止めますが、計算が難しいので、全国55地点の起算日の一覧を青野さんからもらい、昨年12月と今年1月の平均気温で補正しました。 この日から、温度変換日数を足していきます。温度変換日数は、1日の平均気温(日平均気温)の指数関数なのですが、エクセルに入力するとわりと簡単にできます。 温度変換日数の求め方(大阪府立大・青野准教授の提供資料を一部改変) 計算の結果、東京の開花は 3月15日の時点で、東京の場合で計算してみると、補正した起算日は2月7日。2月7日の日平均気温は3. 4度で、温度変換日数に換算すると0. 29。 それを3月14日まで計算して足し合わせていくと、17. 6になります。その先は、予想最高気温と最低気温の平均で計算していきます。22日に23.
すぐに使える形でデータを公開すること.すぐに使える形とは第一正規形だ. 不満はこのくらいにして,手を動かしていこう. 実際の処理は手間隙かかる 年月日の扱いに注意 処理に入る前に年月日の記述について確認しておく.各ページの最後に繰り返し記載されているが, 最早・最晩以外の起日については,年界を越えて前年もしくは翌年にずれ込んで発生した現象についても,当年の欄に発生月日が記述される. おい,ちょっと待て.単純に年と月日を結合して DATE 型のデータを作成しようとしていたのに.余計な手間かけさせやがって. 当年か,前年か,どう判別する? ワークシートをテーブルに変換してフィルターを覗いてみたところ,12 月に咲いている地域がある.主に八重山諸島あたりの低緯度の地域が多そうだ.とはいえ,データ処理には関係ない.サクラの特性からして,月日のデータ長が 4 桁なら前年とみなして良さそうだ. IF LEN(#MonthDay) = 4 THEN #Year = #Year - 1 ELSE #Year END IF …(1) 上記の仮想的なコードを組んでみる.「サクラに限れば」問題なさそうだ.しかし,秋の紅葉など他の生物の特性ではまた別のロジックが必要になることは言うまでもない. DATE型のデータを組む もっとも重要な年の判別ロジックができたら,後は文字列をつないで Date 型のデータを組む. #Date = Datevalue(#Year & #Month & #Day) …(2) #Month = LEFT(#MonthDay, 1) …(3) #Month = LEFT(#MonthDay, 2) …(4) #Day = Right(#MonthDay, 2) …(5) 日の値 (#Day) は右から二桁取ってくるだけで良い.月の値 (#Month) はデータ長により変わる.式 (1) に式 (2) を代入すると次の式 (6) となる. IF LEN(#MonthDay) = 4 THEN #Date = Datevalue(#Year - 1 & #Month & #Day) ELSE #Date = Datevalue(#Year & #Month & #Day) END IF …(6) こんなところだろうか.式 (6) に式 (3), (4), (5) を代入すると次の式 (7) となる.
よく見ると,データの先頭位置が右に一個ずれている.その分,右端のセルが一個右にはみ出している. 結論から言うと,手動でセル削除した.該当するセルを複数同時に削除しても大丈夫だ.気をつけるのは必ず「左方向にシフト」にすること.デフォルトでは「上方向にシフト」となっている.ここを間違えると取り返しがつかなくなる. 空白のセルを選んで「削除」する.必ず「左方向にシフト」にすること 全体を俯瞰する ここで一息ついて,データ全体を俯瞰してみよう.「表示」タブから「ズーム」を選び,倍率を「25%」にする. ワークシートを俯瞰する.倍率は25%.こうやってデータ全体の見晴らしを確認してみることも時には必要 はみ出していたり,凹んだりしている箇所はないか?なさそうだ.ここまで来てやっと前処理が整った. ページごとの行数は同じか? 検索でページ先頭のマーカーとして残しておいた「番号」の文字を全て検索する.大事なのはセルの位置だ.差分がすべて52になっているのが見て取れる. ページのマーカーとして残しておいた「番号」の文字列を検索.セル位置を確認 地点名の並び順は同じか? 次に「地点名」の並び順が同じか確認する.試しに「稚内」を全て検索してみる.セル位置の差分は104.どうやら他の地点名も同じと見て良さそうだ. オリジナルの PDF は 8 ページだったが, コンパクトにまとめられそうだという見通しが立った. カットアンドペーストで一つの塊に並べ替える この文書は何層にも折り畳まれた構造をしている.その折り畳まれた構造を解きほぐし,第一正規形に持っていくのが目的だ. 何層にも折り畳まれた構造.官僚ってこういう文書を作るのは得意だ とにもかくにも,地点名と年別になっているテキストの塊をカットアンドペーストでより単純な形にしていく. カットアンドペーストでより単純な形へ 手動とプログラムの使い分けを見極めよう これ以上手動で対応は無理,でもプログラムを組むには複雑すぎる.そういうボーダーラインがある.プログラムが得意なのは単純な繰り返し作業だ. その単純な形にまで手動で持っていけば,後はルーチン化できる.ここまで失敗を含めた試行錯誤の過程を書き記してきたのは,この国のデータに対するリテラシーを高めたいという思いからである. データは前処理が重要だ.前処理に手間と時間の 90% が取られている.その時間と手間が惜しい.この記事を読んだ人は,官僚の作るデータがいかに使いにくいか,よく分かっていると思う.