# How to use ListLinePlot function with some data in a List in Mathematica 6?

Hi,

I am a beginner of Mathematica. Now I have a question on drawing a diagram with some data in a List.

I have a 2-D List like this:
animal = { {Dog, 1}, {Cat, 2}, {Rabbit, 3}, ... }

How can I draw a line (ListLinePlot) with numbers in the List above only? In other words, I wish to draw a line with data 1, 2, 3, ... the names of animal can be ignored.

Thanks in advance for any help.

###### Who is Participating?

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Commented:
ListPlot - draws lines
animal[i][2] - will access numbers in your array (actually i-th element)

Combine those to get what you need. I dont have Mathematica here so I can not write a code, but if you dont succeed alone with this help I'll do it later :D
0
Commented:
I have not seen logical problem you have: point is defined with two variables x and y coordinate and you only have one ???
0
Author Commented:

I have only data for y variable. The x axis just uses the natural number.
0
Commented:
What do you mean "natural number"? Please explain. Could you give an example?
0
Author Commented:
Natural number means {1, 2, 3, 4, ...}

Given animal = { {Dog, 10}, {Cat, 20}, {Rabbit, 30}, ... }, the result diagram should be a line passing through {x, y} = {1, 10}, {2, 20}, {3, 30}, ...
0
Commented:
Sorry for not answering when I promised :( Here is the code:

``````animal = { {Dog, 1}, {Cat, 2}, {Rabbit, 3} }

myArray = {}

For[i=1, i<=Length[animal],i++,
AppendTo[myArray, {i, animal[[j,2]]}
]

ListPlot[myArray, PlotJoined->True]

(* or draw only points like this *)
ListPlot[myArray, PlotStyle->PointSize[0.05]

``````
0
Commented:
Sorry, there is one bracket missing in code. Here is corrected version:

``````animal = { {Dog, 1}, {Cat, 2}, {Rabbit, 3} }

myArray = {}

For[i=1, i<=Length[animal], i++,
AppendTo[myArray, {i, animal[[j,2]]}];
]

ListPlot[myArray, PlotJoined->True]
``````
0

Experts Exchange Solution brought to you by