We would like to see the Input code as code and then the displays as images. Here is a routine I wrote for my computer to export output displays to a specific location. I did it initially for Mathematica StackExchange, but it's all the same for Wolfram Commumity. You will have to make a folder In your $UserBaseDirectory
for your Mathematica images and then alter the path to correspond to your system.
SEExport::usage =
"SEExport[type][graphic] exports the graphics as an image of the \
given type to a standard location from which it can be uploaded to a \
StackExchange posting. The types are JPEG, PNG or PDF. But it is \
better to Print PDF using Adobe Acrobat.";
SEExport[type : ("JPEG" | "PNG" | "PDF")][item_] :=
Switch[type,
"JPEG",
Export["C:\\Users\\djmpark\\AppData\\Roaming\\Mathematica\\\
StackExchangePlots\\uploadGraphic.jpeg", item, "JPEG"],
"PNG", Export[
"C:\\Users\\djmpark\\AppData\\Roaming\\Mathematica\\\
StackExchangePlots\\uploadGraphic.png", item, "PNG"],
"PDF", Export[
"C:\\Users\\djmpark\\AppData\\Roaming\\Mathematica\\\
StackExchangePlots\\uploadGraphic.pdf", item, "PDF"]
]
Then save any output display with a name:
item = code that produces an output display
and Export the display with (say):
SEExport["JPEG"][item]
Then use the image button on the Wolfram Community input panel to retrieve the image from your computer and insert it into your posting.