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[" ... "]
、投稿がクリーンアップされます。
興味深いことに、これらのユースネットの投稿で見られるエンコーディングはQuoted Printableと呼ばれます。標準の 7 ビット ASCII セットとは異なる文字エンコーディングを ASCII に変換するために使用されます。Rule シンボルなどの多くの一般的な MMA シンボルは、以前にInputForm
cs によって ASCII に変換されていない場合、この方法でエンコードされます。コードをデコードするには、元の文字セットを知る必要があります。これは、QP が文字セット内の 16 進数の位置のみを生成するためです。MMA の場合、最も一般的なのは Math1 です。