Plot[Max[0,Min[1 - (3 Abs[x])/2, 2 - Log[Log[(1 + Abs[x]^(-1)) ]]]], {x, -1, 1}]Plot[Max[0,Min[1 - (3 Abs[x])/2, 2 - Log[Log[(1 + Abs[x]^(-1)) ]]]], {x, -1, 1}]

• Natural Language
• Math Input