1
$\begingroup$

Suppose we have the following sample data:

data={{1,1},{2,1},{2,2},{2,3},{3,3},{4,3},{4,4},{5,4},{6,4},{7,4}}

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?

result={{1,1},{2,3},{3,4},{4,4}}
$\endgroup$

marked as duplicate by Kuba list-manipulation Jul 21 '17 at 6:36

This question has been asked before and already has an answer. If those answers do not fully address your question, please ask a new question.

  • $\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