563のようなg(x)をどうMathematicaでやるのかってことです.