Hello friends;(adsbygoogle = window.adsbygoogle || []).push({});

The points in the source code is supposed to be drawn in 3-D,

S in source code means points in cartesian cordinate (X-Y-Z) respectively.

I am supposed to draw the points in 3-D graph.

Please friends, help me do this.

The source Code is below

a2 = 90; Rz1 = {{Cos[a1 Degree], -Sin[a1

Degree], 0}, {Sin[a1 Degree], Cos[a1 Degree], 0}, {0, 0, 1}};

Rx1 = {{1, 0, 0}, {0, Cos[a2 Degree], -Sin[a2 Degree]}, {0, Sin[a2 Degree],

Cos[a2 Degree]}};

Rz2 = {{Cos[a3 Degree], -Sin[a3 Degree], 0}, {Sin[a3

Degree], Cos[a3 Degree], 0}, {0, 0, 1}};

U = {{1}, {0}, {0}};

S = For[a1 = 0Degree, a1 < 360Degree, a1 += 10Degree,

For[a3 = 0Degree, a3 < 180Degree,

a3 += 10Degree, Print[C = Rz1.Rx1.Rz2.U // N]]]

Thank you

Best Regads

**Physics Forums - The Fusion of Science and Community**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Plotting points in 3-D in Mathematica

Loading...

Similar Threads - Plotting points Mathematica | Date |
---|---|

Plotting A Set of Points in Mathematica | Jun 28, 2015 |

How to label points in 3D Scatter Plot (Mathematica) | May 25, 2012 |

Getting mathematica to take more points when it plots | May 10, 2011 |

Mathematica Connecting Plot Points | Mar 9, 2011 |

[Mathematica]Plotting 3D line with data point | Mar 9, 2009 |

**Physics Forums - The Fusion of Science and Community**