Копирование кода Mathematica в группу Usenet Mathematica иногда рассеивает всевозможные странные символы в вашем коде (вы никогда не знали, когда это случится с вами). Обходной путь будет либо:
Cell > Convert To > InputForm
и затем сделайте копию
Edit > Copy As > Plain Text
или Input Text
Последний не работает в этом случае. Это все еще математически неправильное преобразование, которое вы получите. Первый действительно работает.
Обновление
Если вы когда-нибудь встретите странные символы в сообщениях в группе новостей Mathematica (например, как в здесь ), следующая функция будет декодировать его (во всех случаях, которые я тестировал).
translateQuotedPrintable[str_String] :=
StringReplace[str, {"=" ~~ c1:HexadecimalCharacter~~c2:HexadecimalCharacter :>
FromCharacterCode[FromDigits[c1 <> c2, 16], "Math1"],"=" ~~ EndOfLine -> ""}]
Просто вставьте всю запись между кавычками в translateQuotedPrintable[" ... "]
, и запись будет очищена.
Для любопытных: кодировка, которую вы можете увидеть в этих сообщениях usenet, называется Quoted Printable . Он используется для преобразования кодировок символов, которые отличаются от стандартного 7-битного ASCII, установленного в ASCII. Многие обычные символы MMA, такие как символ правила, кодируются таким образом, если они не были ранее преобразованы в ASCII с помощью InputForm
cs. Чтобы декодировать код, нужно знать исходный набор символов, потому что QP дает только шестнадцатеричную позицию в наборе символов. В случае MMA это обычно будет Math1.