Molecule Plotting 3

MB=Molecule["O=C(N)CCC(N)C(=O)O"]
Multicolumn[Table[MoleculePlot[MB,
ImageSize->{300,200},PlotTheme ->theme,
Sequence[PlotLegends->Placed[Text[theme],Above]]],
{theme,{"AllAtom","HeavyAtom",
"Aromatic","Monochrome"}}],2]
MoleculePlot[MB,FindGraphPartition[MoleculeGraph[MB]]]