Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- In[8]:= Quit
- In[1]:= $HistoryLength = 0
- Out[1]= 0
- In[2]:= MemoryInUse[]
- Out[2]= 16956256
- In[3]:= a = Outer[If[PrimeQ[#1 + #2], 1] &, Range[1500], Range[1500]];
- In[4]:= MemoryInUse[]
- Out[4]= 41191944
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement