Suppose we have the following sample data:


I want remove pairs started with Even numers - {2,1},{2,2},{2,3},{4,3},{4,4},{6,4} How can I create a new pairs list containing on the first place increments of 1, The second value of pair of numbers remains unchanged

In other words how can I get this?

  • $\begingroup$ Have you tried anything? $\endgroup$ – Kuba Jul 21 '17 at 6:28
  • $\begingroup$ Similar questions were closed (143738, 139580, 114709) but I managed to find a close enough duplicate. Just use OddQ/EvenQ in the test instead of <20. $\endgroup$ – Kuba Jul 21 '17 at 6:36
  • $\begingroup$ Thanks You Kuba. I make this: Odd = Cases[data, {_?OddQ, _}][[All, 2]] and second command: Transpose[{Range[First[Dimensions[Odd]]], Odd}] $\endgroup$ – Emilly Jul 21 '17 at 12:26