I want to combine 2D Plot with 3D Plot, where the 2D Plot should be placed on one of the "walls" of the 3D Plot. I have used an idea from this answer and ended with something like that (where the functions are only some example without a meaning)
p1 = Plot3D[Sin[d+s] - Cos[s], {s, 0, Pi}, {d, 0, Pi},
PlotRange -> {0, 1}, AxesLabel -> {"s", "d", "Sin[d+s]-Cos[s]"},
AxesStyle -> Directive[Black, 20]];
p2 = Plot[{(t/Pi)^2, Sqrt[t/Pi]}, {t, 0, Pi},
PlotStyle -> {Black, Blue}];
p3 = Graphics3D @@ (FullGraphics[p2] /.
Line[pts__] :> Line[pts /. {s_, d_} :> {s, 0, d}]);
Show[p1, p3]
I think the plot I obtain is fine, however, I got also some Axes and Ticks errors and the whole background is red, even if I turn the errors off.
What do I wrong?