|
%I #24 Jun 04 2024 12:12:23
%S 0,1,2,3,4,5,6,8,9,12,9,10,11,13,14,17,18,19,22,27,16,17,18,20,21,24,
%T 25,26,29,34,32,33,36,41,48,25,26,27,29,30,33,34,35,38,43,41,42,45,50,
%U 57,50,51,54,59,66,75,36,37,38,40,41,44,45,46,49,54,52,53
%N Norm i^2+j^2+k^2 of (i,j,k) for 0 <= k <= j <= i.
%C In crystallography, these triples (i,j,k) can be interpreted as Miller indices, which can be sorted into a list: (0 0 0), (1 0 0), (1 1 0), (1 1 1), (2 0 0), (2 1 0), (2 1 1), (2 2 0), (2 2 1), (2 2 2), (3 0 0), (3 1 0), (3 1 1), (3 2 0), etc.
%D C. Suryanarayana and M. Grant Norton, X-Ray Diffraction - A Practical Approach, Springer Science + Business Media, 1998, p. 83.
%H S. Phil Ahrenkiel, <a href="http://ahrenkiel.sdsmt.edu/courses/Fall2016/NANO703/lectures/Ch18/TEM_Ch18_91.pdf">List of the first few Miller indices, in order, excluding (0 0 0)</a>
%e The first few triples are:
%e 0, 0, 0
%e 1, 0, 0
%e 1, 1, 0
%e 1, 1, 1
%e 2, 0, 0
%e 2, 1, 0
%e 2, 1, 1
%e 2, 2, 0
%e 2, 2, 1
%e 2, 2, 2
%e 3, 0, 0
%e ...
%p a:=[];
%p for i from 0 to 10 do for j from 0 to i do for k from 0 to j do
%p a:=[op(a),i^2+j^2+k^2]; od: od: od: a; # _N. J. A. Sloane_, Jun 03 2024
%o (Python)
%o print([i**2 + j**2 + k**2 for i in range(7) for j in range(i+1) for k in range(j+1)]) # _Andrey Zabolotskiy_, May 09 2024
%Y The table of triples forms A331195.
%Y Cf. A070770, A069011 (2-dimensional analog), A004215 (complement to this sequence)
%K nonn,tabf
%O 0,3
%A _A. Timothy Royappa_, May 09 2024
%E More terms from _Andrey Zabolotskiy_, May 09 2024
|
