タグ

ブックマーク / hatena.blog (23)

  • 足跡

    機能だけです。 import qualified Control.Monad as CM import qualified Data.Maybe as DM import System.Directory (doesFileExist) import System.Environment (getArgs) import System.FilePath (getSearchPath, (</>)) findExe :: String -> IO (Maybe String) findExe n = DM.listToMaybe `CM.fmap` (CM.filterM pred =<< getSearchPath) where pred p = doesFileExist $ p </> n main :: IO () main = do ps <- getArgs CM.unles

    足跡
  • うなの日記

    stockdb のデータをもとに、全銘柄、全期間の日ごとの各種平均値、標準偏差を計算するSQLを書いたのでメモ。 終値、出来高、価格変動率のそれぞれについて、過去3,5,10,15,25,50,75日の平均値と標準偏差を一気に算出します。 それなりに時間はかかります。確認した環境だと1時間くらいでした。 Window関数すごい。 -- 市場が開いている日の一覧 CREATE MATERIALIZED VIEW days as ( WITH ds AS ( SELECT distinct date FROM rates ), x AS ( SELECT date, row_number() OVER (ORDER BY date) AS index, lag(date, 1, null) OVER (ORDER BY date) AS prev, lag(date, 3, null) OVE

    うなの日記
  • はてなブログ | 無料ブログを作成しよう

    祖母の白寿のお祝い 先日、満99歳(数えで100歳)になった祖母の白寿のお祝いをやった。 さすがに身体のあちこちに不具合が出てきており、そろそろ格的に外出も難しくなってきたので祖母と一緒に家族で集まれるのはたぶんこれが最後だろう。 下は0歳から上は99歳までいるので、移動と諸々…

    はてなブログ | 無料ブログを作成しよう