创建符号XML的问题

Question

在mathematica应用程序中，我有一个代表长方体的ooo - system对象，如下所示:

 In[27]:= oscg@getItem[11]@getObject[]
 Out[27]= {"GE", {"CB", {{3., 0., 3.}, 0.9}}, {0.3}}

我用下面的方法把这个对象转换成Xml:

 In[28]:= oscg@getItem[11]@toXml[]
 Out[28]= XMLElement["cuboid", {"point" -> "{3., 0., 3.}", 
  "diameter" -> "9
  --
  10", "hue" -> "0.3"}, {}]

 XMLElement["cuboid", {"point" -> "{3., 0., 3.}", "diameter" -> "0.9", "hue" -> "0.3"}, {}]

方法代码如下:

 toXml[]:= Module[
{ret,
p=getPoint[] + getColref[]@absPoint[getMe[]], 
d=getDiameter[],
h=getHue[]},
ret=XMLElement["cuboid",{"point"->ToString[p], "diameter"->ToString[d], 
    "hue"->ToString[h]}, {}];
ret
];

问题是0.9变成了9 - 10。

我想到了一个格式问题，但色调很好地输出为0.3。(在读取Xml并将其解析回对象创建代码的阶段，问题变得至关重要。)

问题:

这可能是一个格式，显示问题吗?(这是我在Mathematica中不太熟悉的一个话题。)关于如何解决这个问题，有什么想法吗?

Answer 1

您的直径可能被存储为有理:

 In[1]:= ToString[9/10]
Out[1]:= 9
         --
         10

注意，要将分数打印为字符串，需要两个行尾代码。

在toXml[]中尝试ToString[N@d], ToString[N@h]等。您也可以使用ToString[d,InputForm]来获得9/10。