ForSasha.hs

{-# OPTIONS_GHC -Wall #-}

{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE QuasiQuotes #-}

module Main (main) where

import qualified Language.R as R
import Language.R.QQ


main = do
  let temps10 :: [Double]
      temps10 = [22.0,22.0,23.0,23.0,23.0,23.0,23.0,24.0,24.0,24.0]
      tods10 :: [Double]
      tods10 = [6704.0,6709.0,6715.0,6727.0,6732.0,6736.0,6742.0,6750.0,6757.0,6759.0]
  R.runRegion $ do
    df <- [r| data.frame(time = tods10_hs, val = temps10_hs) |]
    return ()