Skip to main content
1 of 2
pajonk
  • 19.4k
  • 5
  • 29
  • 78

R, 58 bytes

\(x,n=seq(x))any(Map(\(i)all(Map(\(j)x[j]-x[i+j],n)),n-1))

Attempt This Online!

Outputs FALSE for truthy and NA for falsey.

pajonk
  • 19.4k
  • 5
  • 29
  • 78