ベンゼン

ベンゼン

- 野中 孝昌 の投稿
返信数: 0

\tdplotsetmaincoords{0}{0} \begin{tikzpicture}[scale=1,tdplot_main_coords,rotate=0,declare function = {opc=09;Cvdw=1.70 cm; Nvdw=1.55 cm; Ovdw=1.52 cm; Hvdw=1.20 cm; Bvdw=1.92 cm; Clvdw=1.75 cm; Fvdw=1.47 cm;vdw=1/5; lw=3;}]\coordinate (C1) at (0.000, 1.386, -0.000);\coordinate (C2) at (1.200, 0.693, -0.000);\coordinate (C3) at (1.200, -0.693, 0.000);\coordinate (C4) at (-0.000, -1.386, 0.000);\coordinate (C5) at (-1.200, -0.693, -0.000);\coordinate (C6) at (-1.200, 0.693, -0.000);\coordinate (H1) at (0.000, 2.461, -0.000);\coordinate (H2) at (2.131, 1.230, -0.000);\coordinate (H3) at (2.131, -1.230, 0.000);\coordinate (H4) at (-0.000, -2.461, -0.000);\coordinate (H5) at (-2.131, -1.230, 0.000);\coordinate (H6) at (-2.131, 1.230, 0.000);\draw[line width = lw, green] (C1) -- (C2) -- (C3) -- (C4) -- (C5) -- (C6) -- (C1);\foreach \labelx /\labely in {C1/H1, C2/H2, C3/H3, C4/H4, C5/H5, C6/H6}\draw[line width = lw, Pink1] (\labelx) -- (\labely);\foreach \label in {H1, H2, H3, H4, H5, H6}\shade[ball color = white, opacity=opc] (\label) circle (vdw*Hvdw);\foreach \label in {C1, C2, C3, C4, C5, C6}\shade[ball color = black, opacity=opc] (\label) circle (vdw*Cvdw);\end{tikzpicture}