diff --git a/CHANGELOG.md b/CHANGELOG.md new file mode 100644 --- /dev/null +++ b/CHANGELOG.md @@ -0,0 +1,11 @@ +# Changelog for `ihaskell-dataframe` + +All notable changes to this project will be documented in this file. + +The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/), +and this project adheres to the +[Haskell Package Versioning Policy](https://pvp.haskell.org/). + +## Unreleased + +## 0.1.0.0 - YYYY-MM-DD diff --git a/LICENSE b/LICENSE new file mode 100644 --- /dev/null +++ b/LICENSE @@ -0,0 +1,26 @@ +Copyright 2025 Author name here + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are met: + +1. Redistributions of source code must retain the above copyright notice, this + list of conditions and the following disclaimer. + +2. Redistributions in binary form must reproduce the above copyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. + +3. Neither the name of the copyright holder nor the names of its contributors + may be used to endorse or promote products derived from this software + without specific prior written permission. + +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND +ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE +DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR +ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON +ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS +SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. diff --git a/README.md b/README.md new file mode 100644 --- /dev/null +++ b/README.md @@ -0,0 +1,6 @@ +# ihaskell-dataframe + + +## Running locally +`sudo make up` + diff --git a/Setup.hs b/Setup.hs new file mode 100644 --- /dev/null +++ b/Setup.hs @@ -0,0 +1,2 @@ +import Distribution.Simple +main = defaultMain diff --git a/app/Main.hs b/app/Main.hs new file mode 100644 --- /dev/null +++ b/app/Main.hs @@ -0,0 +1,4 @@ +module Main (main) where + +main :: IO () +main = putStrLn "UNIMPLEMENTED" diff --git a/ihaskell-dataframe.cabal b/ihaskell-dataframe.cabal new file mode 100644 --- /dev/null +++ b/ihaskell-dataframe.cabal @@ -0,0 +1,80 @@ +cabal-version: 2.2 + +-- This file has been generated from package.yaml by hpack version 0.37.0. +-- +-- see: https://github.com/sol/hpack + +name: ihaskell-dataframe +version: 0.1.0.0 +description: Utilties for working with dataframes in IHaskell. +homepage: https://github.com/githubuser/ihaskell-dataframe#readme +bug-reports: https://github.com/githubuser/ihaskell-dataframe/issues +author: Michael Chavinda +maintainer: mschavinda@gmail.com +copyright: 2025 Michael Chavinda +license: BSD-3-Clause +license-file: LICENSE +build-type: Simple +extra-source-files: + README.md + CHANGELOG.md + +source-repository head + type: git + location: https://github.com/githubuser/ihaskell-dataframe + +library + exposed-modules: + IHaskell.Display.Dataframe + other-modules: + Paths_ihaskell_dataframe + autogen-modules: + Paths_ihaskell_dataframe + hs-source-dirs: + src + ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-export-lists -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints + build-depends: base >=4.7 && <5 + , dataframe >= 0.3.3.6 && < 1 + , dataframe-hasktorch >= 0.1.0.2 && < 1 + , hasktorch >= 0.2.1.6 && < 1 + , ihaskell == 0.13.0.0 + , text >= 2.0 && < 3 + , random-shuffle >= 0.0.4 && < 1 + , random >= 1.3.0 && < 2 + default-language: Haskell2010 + +executable ihaskell-dataframe-exe + main-is: Main.hs + other-modules: + Paths_ihaskell_dataframe + autogen-modules: + Paths_ihaskell_dataframe + hs-source-dirs: + app + ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-export-lists -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints -threaded -rtsopts -with-rtsopts=-N + build-depends: base >=4.7 && <5 + , dataframe >= 0.3.3.6 && < 1 + , dataframe-hasktorch >= 0.1.0.2 && < 1 + , hasktorch >= 0.2.1.6 && < 1 + , ihaskell >= 0.13.0.0 && < 1 + , text >= 2.0 && < 3 + , random-shuffle >= 0.0.4 && < 1 + , random >= 1.3.0 && < 2 + default-language: Haskell2010 + +test-suite ihaskell-dataframe-test + type: exitcode-stdio-1.0 + main-is: Spec.hs + other-modules: + Paths_ihaskell_dataframe + autogen-modules: + Paths_ihaskell_dataframe + hs-source-dirs: + test + ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-export-lists -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints -threaded -rtsopts -with-rtsopts=-N + build-depends: base >=4.7 && <5 + , dataframe >= 0.3.3.6 && < 1 + , ihaskell >= 0.13.0.0 && < 1 + , ihaskell-dataframe >= 0.1.0.0 && < 1 + , text >= 2.0 && < 3 + default-language: Haskell2010 diff --git a/src/IHaskell/Display/Dataframe.hs b/src/IHaskell/Display/Dataframe.hs new file mode 100644 --- /dev/null +++ b/src/IHaskell/Display/Dataframe.hs @@ -0,0 +1,23 @@ +module IHaskell.Display.Dataframe where + +import IHaskell.Display + +import qualified DataFrame as D +import qualified DataFrame.Display.Web.Plot as Plot +import DataFrame.Display.Web.Plot (HtmlPlot(..)) +import DataFrame (DataFrame) + +import qualified Data.Text as T + +instance IHaskellDisplay DataFrame where + display val = return $ Display [stringDisplay, markdownDisplay] + where + str = T.unpack (D.toMarkdownTable val) + stringDisplay = plain str + markdownDisplay = markdown str + +instance IHaskellDisplay HtmlPlot where + display (HtmlPlot val) = return $ Display [stringDisplay, htmlDisplay] + where + stringDisplay = plain (T.unpack val) + htmlDisplay = html (T.unpack val) diff --git a/test/Spec.hs b/test/Spec.hs new file mode 100644 --- /dev/null +++ b/test/Spec.hs @@ -0,0 +1,2 @@ +main :: IO () +main = putStrLn "Test suite not yet implemented"