Advertisement
Guest User

Untitled

a guest
Apr 23rd, 2019
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.89 KB | None | 0 0
  1. let trainDataPath = Path.Combine("../","Data","lyrics.csv")
  2. let msft = CsvFile.Load(File.Open(trainDataPath, FileMode.Open), separators = ",", quote = '"', hasHeaders= true)
  3.  
  4. let songLyrics =
  5. msft.Rows
  6. |> Seq.filter (fun row -> not(row.GetColumn "lyrics" |> String.IsNullOrEmpty))
  7. |> Seq.filter (fun row -> not(String.Equals(row.GetColumn "lyrics", "[Instrumental]", StringComparison.OrdinalIgnoreCase)))
  8. |> Seq.map (fun row -> { Song = (row.GetColumn "song")
  9. Artist = (row.GetColumn "artist")
  10. Genre = (row.GetColumn "genre")
  11. Lyrics = (row.GetColumn "lyrics").Replace(Environment.NewLine, ", ")
  12. Year = (row.GetColumn "year") |> int
  13. })
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement