How can I find a list of points that satisfy constraints?

Question

I understand how to make lists with the Select function and NestList, but these are only for one dimensional lists. Is it possible to make lists of all points that satisfy a constraint? For example, all points {x,y} that satisfy PrimeQ[x*y+1]==True.

Sorry if this is really amateur, I only recently started Mathematica and I'm trying to teach myself the functions.

Like Select[pts, PrimeQ[Apply[Times, #] + 1] &]? – J. M.'s missing motivation May 17 '17 at 13:35 — J. M.'s missing motivation, May 17 '17 at 13:35

score 2 · Answer 1 · answered May 17 '17 at 13:38

2

There are many ways to do this. I will show one with SparseArray.

matrix = SparseArray[{x_, y_} /; PrimeQ[x y + 1] -> 1, {100, 100}]

Now try these:

MatrixPlot[matrix]

ArrayRules[matrix]

Keys@Most@ArrayRules[matrix]

The last one just gives a list of {x,y} pairs.

answered May 17 '17 at 13:38

Szabolcs

234,956
30
623
1,263

f@x is just alternative notation for f[x]. – Szabolcs May 17 '17 at 13:38
What does the ->1 mean? – volcanrb May 17 '17 at 14:40
@volcanrb , You might be interested in this thread. – N.J.Evans May 17 '17 at 15:15
@volcanrb It depends on the context. For this use, look up SparseArray. – Szabolcs May 17 '17 at 16:46

How can I find a list of points that satisfy constraints?

1 Answers1