Тег графика в защищен

Question

График не показывает, я не знаю, что делать с: «Tag Graphics in Protected»?

Answer 1

Пожалуйста, перезапустите ядро Mathematica. Вы неправильно установили некоторые символы, потому что нет причин, по которым ваш код не должен работать

f[x_] = (Cos[x])/(x^2 - 2*x - 3);
d = Plot[f[x], {x, -5, 8}];
e = ListPlot[{{1, f[1]}}, PlotStyle -> PointSize[0.02]];
Show[d, e]