Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- let trainDataPath = Path.Combine("../","Data","lyrics.csv")
- let msft = CsvFile.Load(File.Open(trainDataPath, FileMode.Open), separators = ",", quote = '"', hasHeaders= true)
- let songLyrics =
- msft.Rows
- |> Seq.filter (fun row -> not(row.GetColumn "lyrics" |> String.IsNullOrEmpty))
- |> Seq.filter (fun row -> not(String.Equals(row.GetColumn "lyrics", "[Instrumental]", StringComparison.OrdinalIgnoreCase)))
- |> Seq.map (fun row -> { Song = (row.GetColumn "song")
- Artist = (row.GetColumn "artist")
- Genre = (row.GetColumn "genre")
- Lyrics = (row.GetColumn "lyrics").Replace(Environment.NewLine, ", ")
- Year = (row.GetColumn "year") |> int
- })
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement