Running Academy 2024 CHALLENGE RUN　レポート公開

コメントを残す

8月から開始されていた、ASICS presents Running Academy 2024も全日程を終え、最終の提出したCHALLENGE RUNに対するレポートが公開されました。

今回、このレポートにはオホーツク網走マラソンの記録を提出、レポートしてもらっています。

サマリ

ベストスコアとしては70。
高くもなく低くもなくと行ったところでしょうか

ベストを出したのは約17kmなので、能取岬を超えて少し行ったところ。
喉につまらさせたエイドのかぼちゃ団子等の咀嚼が終わったあったりかな・・・
確かにあの辺りでペースを上がっていた記憶があります

ワーストスコアは・・・完全にへばっているあたりですね。
うん、これはしょうがない

「負担のない接地」「左右対称性」の順位が良いのですが、「動きの力強さ」や「スムーズな重心移動」の順位がやはり低いですね。

スコアだけで見ると、「安定した姿勢」も悪くないのですが、順位としてはそれほど高くありません。

これは、マラソンランナーという集団で考えてみたときには、基本的に長距離を走る関係でみんな姿勢は安定しているということでしょう。

まぁ、CHALLENGE RUNへ提出するレポートに関しては基本的に距離をそこまで問わない形なので、そこまで長距離を走らなくても提出はできます。
そう考えると、「動きの力強さ」に着目した走りということもできなくはないので、順位は気にせず、スコアを注視していきたいところ。

伸びしろ？

今回のRunning Academy 2024最終レポートとして、「あなたの伸びしろ」が出ているのですが・・・

2月までに余裕でサブ3.5できるどころか、ほぼ3時間ペースだと・・・？

上記のタイムを叩き出すためには平均大体4:12/kmくらい。
短い距離であれば、そりゃ出せるけどちょっと今のところフルマラソンをそのペースで走れるイメージは正直ないなぁ・・・

かるめの練習でもそこまで伸びると予想されている一方、キツめの練習を週4でやった場合のかるめ週２とのタイム差が約5分。

ここからはタイムを縮めるには相当な努力が求められるということなんでしょう。。。
うーん、きつめってどれくらいのことを指しているんだろう。。

いずれにしても、眼の前のアクアラインマラソン。そして湘南国際。

今シーズン最後に2月くらいに何処かで走りたいとは思っているけれど、湘南国際あたりでサブ3.5を達成したいな！

LINEをごちゃごちゃと移行していたら止められた件

コメントを残す

私がiPhone16Proを購入した関係で、子供達に玉突きで端末を入れ替えていました。

基本的には順調に進んでいたのですが、今回小６になる次男がiPhoneを新たに持つことになったのですが、iPhone8だったんですよね。
これのインストール可能iOSが15までとなっているため、LINEが新規にインストールできませんでした（16以上）

色々と手を回したのですが、いまいち回避策が思いつかなかったのですが、過去に利用したことがあるアプリケーションであれば、古いバージョンをインストール可能と言うことを利用して

新端末で利用している娘のアカウントを古い端末にデータ移行を行う
新端末で次男のアカウントを再セットアップ。LINEをインストールする
新端末でiCloudバックアップを行い、その後端末を消去
古い端末に逃していた娘のアカウントをデータ移行を新端末に実施
古い端末を次男のアカウントで再セットアップ。iCloudからデータ復旧

とすることで、新規にLINEをインストールすることができないiOSバージョンであってもLINEを利用することができるようになりました。

ただ。。。

何度も何度もアカウント移行を繰り返してしまったせいか、最終的にLINEへログインしようとしたら、認証で拒否されてしまいました。。。（60日後にトライしろと）

流石に60日を待つのは辛いものがあるので、一旦このSIMを変更して電話番号を変えた上で新規アカウントを登録する形がいいのかな、と思い始めています。

手強い。。。

アクアラインマラソンのゼッケン到着

コメントを残す

表題のとおりですが、11/10開催のアクアラインマラソンのゼッケンが到着しました！

ここのところ、雨が続いていたり仕事がいそがしかったりでろくに練習をすることができていませんが、この週末は3連休。

最後のロングランをする絶好のタイミングですのでできるだけ仕事を残さない形で迎えられるよう、平日頑張らねば・・・

VBAの条件評価式は短絡評価にならない

コメントを残す

久しぶりにVBAをせこせこと書いているわけですが、関数の概略とかそういうのを全部自力で書くというのは骨の折れるもので、なんとなくの内容をClaudeに教えて関数を作ってもらいます。

当然、そのままでは動くわけもないのでエラーをつぶしていくわけですが、ぱっと見で何が誤っているのかがよくわからないエラーにぶつかりました

Dim tableNames(5)
For i = 1 to 5
    If i > 2 And tableNames(i) <> tableNames(i - 1) Then

ちょっと内容は端折りますが、2つの条件式があった場合に、一般的なプログラミング言語であれば一つ目の条件式評価の結果、以降の条件式を評価する必要がない場合はそもそも評価が実行されないのですよね。

これによって、Nullチェックや配列のインデックス範囲外アクセスを防いだりします。
ところがVBAでは、すべての条件式が評価されるようです。

初めて知りました。。。

何というか、やっぱりVBAは独特だなぁ。。。と

dyneinを使ってエクセルのデータをDynamoDBへImportする

コメントを残す

少し前に紹介したDynamoDBの操作ツールであるdynein。実際に少し使い始めています。

dynein
https://github.com/awslabs/dynein

取り込むデータはExcelで作成して、それを元にCSVファイルを作成、dyコマンドで取り込もうとしたのですが、、、CSVファイルの取り込みがイマイチでした。。。

そもそも、カラムとしてリスト形式の値を持つものもあるので、CSV形式だとちょっと無理があったかもしれませんが、それにしてもCSV形式の取り込みとしては少し癖がありそうでした。

というわけでJSON形式での取り込みに変更しました。

エクセル上のデータをJSONへ吐き出す方法に関しては、VBAで書いたのですが、VBAでUTF-8形式のファイルを作成するのって結構面倒なんですね。。。

Sub SaveFileUTF8WithoutBOM(filePath As String, dataString As String)
    Dim adodb1 As Object
    Dim adodb2 As Object

    Set adodb1 = CreateObject("ADODB.Stream")
    Set adodb2 = CreateObject("ADODB.Stream")

    With adodb1
        .Charset = "UTF-8"
        .Open
        .WriteText dataString
        .Position = 3
        With adodb2
            .Type = 1
            .Open
            adodb1.CopyTo adodb2
            .SaveToFile filePath, 2
            .Close
        End With
        .Close
    End With
End Sub

一度、ファイルストリームを開いてから、BOM分だけずらし、その内容をコピーするという、何というかバイナリ操作が入るような。。。

VBAもいまだにこういうことをしないとUTF-8を書けないのだろうか？という気になります。もうちょっと何とかならんのですかね。