なまけもの日記

人生のメモ帳

山梨県笛吹市 石和温泉

とある研究会に参加するため,山梨県笛吹市にある石和温泉に出張していました.

時間があるときに周辺を軽く観光.

石和温泉駅

駅の観光案内所に有料のワイン試飲コーナーがありました.

f:id:yound:20170720150724j:plain:w400 f:id:yound:20170722115811j:plain:w400 f:id:yound:20170722115827j:plain:w400

マルス山梨ワイナリー

マルス山梨ワイナリーでワイン工場見学とワインの試飲.ワインは飲み慣れていないので味や香りの違いなどはあまり分かりませんでしたが,無料で試飲できるワインと有料で試飲できるワインの味の違いは分かりました.

f:id:yound:20170721160047j:plain:w400 f:id:yound:20170721160904j:plain:w400 f:id:yound:20170721160314j:plain:w400 f:id:yound:20170721160614j:plain:w400 f:id:yound:20170721161734j:plain:w400

モンデ酒造でワインの試飲

モンデ酒造では工場見学をする時間がなかったので試飲のみを堪能.ワインだけでなくお茶のリキュールなども試飲できて面白い.

f:id:yound:20170721164939j:plain:w400 f:id:yound:20170721165013j:plain:h400 f:id:yound:20170721165228j:plain:h400 f:id:yound:20170721165330j:plain:h400

雑記

折角なので甲府まで足を伸ばして武田信玄ゆかりの地を観光すれば良かった…

石和温泉 - Wikipedia

Bose QuietComfort 20

BOSEのインイヤー型ノイズキャンセリング・ヘッドホン「Bose QuietComfort 20」を購入.4年前に購入した「Bose QuietComfort 20i」は経年劣化でケーブルの断線が生じたりして壊れ,使い物にならなくなってました.新しくQuietComfort20を購入するか,それともネックバンド式のワイヤレスノイズキャンセリングイヤホン「QuietControl 30」を購入するかで迷いましたが,出張時に航空機の機内で気軽に使えるように「QuietComfort 20」にしました.最大の決め手は,Amazonプライムデーのセールで30%OFFになっていたこと.良い買物でした.

f:id:yound:20170713164151j:plain:h400

f:id:yound:20170713164220j:plain:w400

f:id:yound:20170713164620j:plain:w400

yound.hatenablog.com

yound.hatenablog.com

Googleスプレッドシートで自動更新される株メモを作成

GoogleスプレッドシートのIMPORTXML関数で外部Webサービスからデータを取得するのが便利です.FirefoxのアドオンのFirebugXPathを取得して,タグや階層を指定すればIMPORTXML関数で任意のデータを取り出せる.つまり,指定した株の最新の情報を自動で取得して更新してくれるメモが作成可能.

株メモ

IMPORTXML関数が興味深かったので,適当に遊んでみました.外部から好きなデータが取得できます.

対象 取得結果の例 数式 ※A2のセルに銘柄コード(例:3048)を入力
銘柄 ビックカメラ =IF(A2="","---",SUBSTITUTE(IMPORTXML(CONCATENATE("http://stocks.finance.yahoo.co.jp/stocks/history/?code=",A2),"//th[@class='symbol']"),"(株)",""))
株価 1,175 =IF(A2="","---",IMPORTXML(CONCATENATE("http://stocks.finance.yahoo.co.jp/stocks/history/?code=",A2),"//td[@class='stoksPrice']"))
単元株数 100 =IF(A2="","---",IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/detail/?code=",A2),"//div[@id='rfindex']/div[2]/div[10]/dl/dd/strong"))
決算月 8月末日 =IF(A2="","---",IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/profile/?code=",A2),"//table[@class='boardFinCom marB6']/tr[12]/td"))
配当 ○(配当がある場合○,なければ×) =IF(A2="","-",IF(ISERROR(IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/detail/?code=",A2),"//div[@id='rfindex']/div[2]/div[4]/dl/dd/strong/a")),"×","○"))
一株配当 12 =IF(A2="","---",IF(ISERROR(IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/detail/?code=",A2),"//div[@id='rfindex']/div[2]/div[4]/dl/dd/strong/a")),"---",IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/detail/?code=",A2),"//div[@id='rfindex']/div[2]/div[4]/dl/dd/strong/a")))
配当利回り 1.02 =IF(I2="---","---",IMPORTXML(CONCATENATE("https://stocks.finance.yahoo.co.jp/stocks/detail/?code=",A2),"//div[@id='rfindex']/div[2]/div[3]/dl/dd/strong"))
優待 ○(株主優待がある場合○,なければ×) =IF(A2="","-",IF(ISERROR(IMPORTXML(CONCATENATE("https://info.finance.yahoo.co.jp/stockholder/detail/?code=",A2),"//div[@class='incentiveNomatch']/p")),"○","×"))
参照URL ■(ハイパーリンク) =IF(A2="","---",HYPERLINK(CONCATENATE("https://info.finance.yahoo.co.jp/stockholder/detail/?code=",A2),"■"))

試してみたけど,結局リアルタイム性の必要ない項目が多い.本当に自動で更新したい項目のみをIMPORTXML関数で取得するようにして,他の項目は一旦取得した後にコピペで数式ではなく文字データとして残した方が使いやすそう.

関数のメモ

  • IF:銘柄コードのセルが空白の場合等に”—”と表示させるために利用
  • IMPORTXML:外部Webサービスからデータを取得
  • SUBSTITUTE:取得したデータ(文字列)から指定文字列を削除.”(株)”の表示を消したかったため利用.
  • CONCATENATE:文字列結合.指定したセルに記載した銘柄コードとIMPORTXML用のURLを結合させるために利用.
  • ISERROR:エラー判定.外部Webサービスの指定タグが存在していなかった場合(配当や優待が存在しない場合)の処理を記載するために利用.
  • HYPERLINK:ハイパーリンク参照元のURLを記載しておく際にURLをそのまま記載すると長いので適当に■にURLを割り当てるために利用.

参考

Google Docs スプレッドシートのimportXMLの使い方 – Seamonkey-Director

データを集める技術 (Informatics &IDEA)

データを集める技術 (Informatics &IDEA)

ATOK Pad for Windowsで同期できない不具合が生じた際の解決方法

ATOK Passportを長年使い続けているATOKユーザーです.ATOK PadiPhoneの「ATOK Pad for iOS」とWindowsの「ATOK Pad for Windows」をEvernote経由で同期させることにより,様々なメモを気軽に高速に共有できます.アイデア出しに最適です.ATOK Padがないと作業効率が急激に低下します.

ATOK Padは公私にわたって利用し続けているのですが,ここ最近,ATOK Pad for Windowsでデータの同期に不具合が発生して,「同期できませんでした」状態に陥っていました.

原因は不明ですが無事に解決できたので,とりあえず解決方法をメモ.

発生した不具合

  • Evernoteとの同期が正常にできない.
  • iPhone側やEvernoteのWeb上で更新したデータはダウンロードできるが,Windows端末上で編集したデータがアップロードできない.
  • Windows以外の端末では同期できているため,Evernote側の同期の不具合ではない.

解決方法

  1. ATOK Pad for Windowsをアンインストー

  2. ATOK Pad for Windowsの関連ファイルを削除

    Windows端末上でのATOK Padのファイルの場所

     C:\Users\<User>\AppData\Roaming\Justsystem\AtokPad
    

    このフォルダ内にあるファイルがATOK Pad関係のデータ.ATOK Pad for Windowsをアンインストールしても,これらのファイルが残った状態だと再インストールしても不具合が解決できないので削除すること.

  3. ATOK Pad for Windowsを再インストー

    ATOK Pad for Windowsインストーラ

    ATOK Padを再インストールして,Evernoteと再度同期させれば無事に解決.

レザークラフト始めました

レザークラフトに手を出してました.

道具

新規購入した道具

  • 4本菱目打ち 4mmピッチ
  • 2本菱目打ち 4mmピッチ
  • 仕立て用目打ち
  • 手縫い針(丸針)
  • ロウ引き糸
  • 革工具用ゴム板
  • トコノール
  • ヌメ革

東急ハンズレザークラフトコーナーで購入.菱目打ちのピッチやロウ引き糸の色を自分の好みに合わせるため,初心者用の入門キット(セット)ではなく個別に選んで購入しました.

既に持ってた道具と100円ショップで揃えた道具

  • ハンマー
  • カッター
  • カッターマット
  • 金属製定規
  • ボンド
  • ヘラ
  • クランプ

購入を見送った道具

  • スティック へり磨き
  • ガラス板 結果的にはなくても困りませんでした.

製作物1:ブックカバー

革を型紙に合わせて裁断

f:id:yound:20170316220311j:plain:w400 f:id:yound:20170316222045j:plain:w400

トコノールで裏面を処理(左:処理前,右:処理後) f:id:yound:20170319135106j:plain:w400

縫い穴開けて糸通して完了. f:id:yound:20170321194615j:plain:w400

製作物2:ポストイットのレザーケース

型紙を設計 f:id:yound:20170705172538j:plain:w400

裁断して裏面処理してボンドで仮止め f:id:yound:20170705233153j:plain:w400

縫い穴開けて縫い合わせ完了 f:id:yound:20170706105353j:plain:w400 f:id:yound:20170706105401j:plain:w400

表面を革用のクリームでお手入れ f:id:yound:20170706111358j:plain:w400

完成! f:id:yound:20170706113142j:plain:w400

黒いG対策

とうとう黒いGが部屋の中に堂々と出現する時期になりました.あいつらの存在が許せません.戦うためには武器が必要です.箒で物理攻撃,殺虫スプレーで遠距離攻撃,ホイホイで即効性の設置罠,毒エサで攻撃罠,虫除けスプレーで防御系のバリア.

【第2類医薬品】医薬品ゴキジェットプロ 450mL

【第2類医薬品】医薬品ゴキジェットプロ 450mL

アース製薬 ブラックキャップ 12個入り

アース製薬 ブラックキャップ 12個入り

ハッカ油の利用

今年はハッカ油で作成した虫除けスプレーも利用します.

f:id:yound:20170704192754j:plain

ハッカ油P 20ml

ハッカ油P 20ml

無水エタノールP 500ml

無水エタノールP 500ml

必ず平穏を取り戻す.

HUNTER×HUNTER 34巻

HUNTER×HUNTERの新刊が1年ぶりに発売されてた.

HUNTER×HUNTER 34 (ジャンプコミックス)

HUNTER×HUNTER 34 (ジャンプコミックス)