// A=[0,4,4,0,0,4,4,0,2,4,2,0,2,2,1,3,3,1];B=[0,0,4,4,0,0,4,4,0,2,4,2,2,2,1,1,3,3];C=[0,0,0,0,4,4,4,4,2,2,2,2,0,4,3,1,3,1];plot3(A,B,C,'r.','markersize',250)line([A(1)A(2)],[B(1)B(2)],[C(1)C(2)],'Color','b','LineWidth',4);line([A(2)A(3)],[B(2)B(3)],[C(2)C(3)],'Color','b','LineWidth',4);line([A(3)A(4)],[B(3)B(4)],[C(3)C(4)],'Color','b','LineWidth',4);line([A(6)A(7)],[B(7)B(6)],[C(6)C(7)],'Color','b','LineWidth',4);line([A(4)A(8)],[B(4)B(8)],[C(4)C(8)],'Color','b','LineWidth',4);line([A(5)A(6)],[B(5)B(6)],[C(5)C(6)],'Color','b','LineWidth',4);line([A(7)A(8)],[B(7)B(8)],[C(7)C(8)],'Color','b','LineWidth',4);line([A(1)A(5)],[B(1)B(5)],[C(1)C(6)],'Color','b','LineWidth',4);line([A(2)A(6)],[B(2)B(6)],[C(2)C(6)],'Color','b','LineWidth',4);line([A(3)A(7)],[B(3)B(7)],[C(3)C(7)],'Color','b','LineWidth',4);line([A(7)A(8)],[B(7)B(8)],[C(7)C(8)],'Color','b','LineWidth',4);line([A(1)A(4)],[B(1)B(4)],[C(1)C(4)],'Color','b','LineWidth',4);line([A(5)A(8)],[B(5)B(8)],[C(5)C(8)],'Color','b','LineWidth',4);line([A(15)A(5)],[B(15)B(5)],[C(15)C(5)],'Color','b','LineWidth',4);line([A(15)A(14)],[B(15)B(14)],[C(15)C(14)],'Color','b','LineWidth',4);line([A(15)A(9)],[B(15)B(9)],[C(15)C(9)],'Color','b','LineWidth',4);line([A(15)A(12)],[B(15)B(12)],[C(15)C(12)],'Color','b','LineWidth',4);line([A(16)A(2)],[B(16)B(2)],[C(16)C(2)],'Color','b','LineWidth',4);line([A(16)A(10)],[B(16)B(10)],[C(16)C(10)],'Color','b','LineWidth',4);line([A(16)A(9)],[B(16)B(9)],[C(16)C(9)],'Color','b','LineWidth',4);line([A(16)A(13)],[B(16)B(13)],[C(16)C(13)],'Color','b','LineWidth',4);line([A(17)A(14)],[B(17)B(14)],[C(17)C(14)],'Color','b','LineWidth',4);line([A(17)A(7)],[B(17)B(7)],[C(17)C(7)],'Color','b','LineWidth',4);line([A(17)A(10)],[B(17)B(10)],[C(17)C(10)],'Color','b','LineWidth',4);line([A(17)A(11)],[B(17)B(11)],[C(17)C(11)],'Color','b','LineWidth',4);line([A(18)A(4)],[B(18)B(4)],[C(18)C(4)],'Color','b','LineWidth',4);line([A(18)A(13)],[B(18)B(13)],[C(18)C(13)],'Color','b','LineWidth',4);line([A(18)A(11)],[B(18)B(11)],[C(18)C(11)],'Color','b','LineWidth',4);line([A(18)A(12)],[B(18)B(12)],[C(18)C(12)],'Color','b','LineWidth',4);
grid on