This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A328189 #9 Mar 14 2023 15:52:39
%S A328189 8,16,18,20,27,28,32,40,42,44,50,52,54,56,64,66,68,75,76,78,80,81,88,
%T A328189 92,98,99,100,102,104,110,112,114,116,117,124,125,126,128,130,136,138,
%U A328189 140,147,148,152,153,156,160,162,164,170,171,172,174,176,184,186
%N A328189 Numbers n with at least one pair of consecutive divisible nontrivial divisors (greater than 1 and less than n).
%e A328189 The nontrivial divisors of 42 are {2, 3, 6, 7, 14, 21}, with pairs of consecutive divisible divisors {3, 6} and {7, 14}, so 42 belongs to the sequence.
%t A328189 Select[Range[200],MatchQ[DeleteCases[Divisors[#],1|#],{___,x_,y_,___}/;Divisible[y,x]]&]
%t A328189 Select[Range[2,200],AnyTrue[Partition[Most[Rest[Divisors[#]]],2,1],Mod[#[[2]],#[[1]]] == 0&]&] (* _Harvey P. Dale_, Mar 14 2023 *)
%Y A328189 Complement of A328161.
%Y A328189 Positions of terms greater than 1 in A328194.
%Y A328189 Partitions with a pair of consecutive divisible parts are A328221.
%Y A328189 Cf. A000005, A060680, A060775, A067513, A088725, A163870, A328028, A328162, A328171.
%K A328189 nonn
%O A328189 1,1
%A A328189 _Gus Wiseman_, Oct 13 2019