三フッ化ホウ素

三フッ化ホウ素

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

\tdplotsetmaincoords{30}{30}\begin{tikzpicture}[scale=1,tdplot_main_coords,rotate=12,declare function = {opc=0.9;COD=1511120; spg=P1;a=4.730; b=7.374; c=13.987; alpha=87.21; beta=89.22; gamma=72.70;Cvdw=1.70 cm; Hvdw=1.20 cm; Bvdw=1.92 cm; Clvdw=1.75 cm; Fvdw=1.47 cm;vdw=1/5; lw=3;}]\coordinate (B) at  (1.284, 2.100, 8.891);\coordinate (F1) at (1.833, 2.443, 7.769);\coordinate (F2) at (0.131, 1.535, 8.912);\coordinate (F3) at (1.917, 2.335, 9.990);\node[below=2.05cm, rotate=180] at (B) {$\begin{tikzpicture}[scale=0.3]\shade[ball color = red, opacity = 1] (-0.8,1.3) circle (0.3 cm);\shade[ball color = red, opacity = 0.7] (0,0) ellipse (2.1 cm and 2.75 cm);\end{tikzpicture}$};\foreach \label in {F1, F2, F3}\draw[line width = lw, Gold1] (B) -- (\label);\shade[ball color = Pink1, opacity=opc] (B) circle (vdw*Bvdw);\foreach \label in {F1, F2, F3}\shade[ball color = SkyBlue2, opacity=opc] (\label) circle (vdw*Fvdw);\node[above=1.5mm] at (B) {$\begin{tikzpicture}[scale=0.3]\shade[ball color = blue, opacity = 1] (-0.8,1.3) circle (0.3 cm);\shade[ball color = blue, opacity = 0.7] (0,0) ellipse (2.1 cm and 2.75 cm);\end{tikzpicture}$};\end{tikzpicture} \DtetrahedralS{0==B;1==F;2==F;3==F}

\tdplotsetmaincoords{30}{30}
\begin{tikzpicture}[scale=1,tdplot_main_coords,rotate=12,
declare function = {
opc=0.9;
COD=1511120; spg=P1;
a=4.730; b=7.374; c=13.987; alpha=87.21; beta=89.22; gamma=72.70;
Cvdw=1.70 cm; Hvdw=1.20 cm; Bvdw=1.92 cm; Clvdw=1.75 cm; Fvdw=1.47 cm;
vdw=1/5; lw=3;
}]
\coordinate (B) at  (1.284, 2.100, 8.891);
\coordinate (F1) at (1.833, 2.443, 7.769);
\coordinate (F2) at (0.131, 1.535, 8.912);
\coordinate (F3) at (1.917, 2.335, 9.990);
\node[below=2.05cm, rotate=180] at (B) {$\begin{tikzpicture}[scale=0.3]
\shade[ball color = red, opacity = 1] (-0.8,1.3) circle (0.3 cm);
\shade[ball color = red, opacity = 0.7] (0,0) ellipse (2.1 cm and 2.75 cm);
\end{tikzpicture}$};
\foreach \label in {F1, F2, F3}
\draw[line width = lw, Gold1] (B) -- (\label);
\shade[ball color = Pink1, opacity=opc] (B) circle (vdw*Bvdw);
\foreach \label in {F1, F2, F3}
\shade[ball color = SkyBlue2, opacity=opc] (\label) circle (vdw*Fvdw);
\node[above=1.5mm] at (B) {$\begin{tikzpicture}[scale=0.3]
\shade[ball color = blue, opacity = 1] (-0.8,1.3) circle (0.3 cm);
\shade[ball color = blue, opacity = 0.7] (0,0) ellipse (2.1 cm and 2.75 cm);
\end{tikzpicture}$};
\end{tikzpicture}

\DtetrahedralS{0==B;1==F;2==F;3==F}