txt <- c("[image]\n",
"Ein Paar hat 8 gute Bekannte, von denen die beiden 5 zum Essen einladen möchten.",
"Wie viele verschiedene Reihenfolgen des Eintreffens der eingeladenen 5 Gäste gibt es?\n",
": 56",
"; 120",
"; 336",
"; 2002",
"; 6720",
"; 32768",
"; 40320",
"; Keine Antwort ist richtig")
toRMarkdown(txt)
Run the code above in your browser using DataLab