When I export a CSV file using the code above, I get something like this:
I'd like to export the answers / text on the right column without "Row[{}]" but just the raw text. Is this possible?
Code:
answer[question_, numberofanswers_] :=
Export[StringJoin[question, ".csv"],
FindTextualAnswer[articles, question,
numberofanswers, {"Probability",
"HighlightedSentence"}]]
articles = WikipediaData /@
WikipediaSearch["Content" -> question];
answer["What model occurs in all the sciences?", 1000]
Furthermore, is it possible to export corresponding Wiki page titles and links next to these answers or no?