Можете ли вы уточнить немного, что вы хотите?В частности, почему Шоу не работает для вас?
Комбинирование графиков - это то, для чего Шоу предназначено:
Show[Table[
Plot[x^n, {x, 0, 100}, PlotStyle -> ColorData[1][n]], {n, 10}],
PlotRange -> {All, 10^14}]
(Я указал PlotRange здесь, поскольку каждый из этих графиков имеет свой автоматически выбранный диапазон графика.)
График также может напрямую отображать сразу несколько функций:
Plot[Evaluate[Table[x^n, {n, 10}]], {x, 0, 100}]
(В первом примере я использовал ColorData , чтобы имитировать те же самые цвета, которые автоматически используются во втором примере ... Но вы можете использовать любые цвета, которые вы хотитенапример Hue[RandomReal[]]
.)