Например очень удобными являются компактные во времени базисы (вейвлет преобразование)

P.S.: Существует ли мнимая единица в реальности?)

sol = Solve[8000000 n/m - 100000000 f == 0, {n, m, f}, 
   Integers] //. {C[1] -> c1, C[2] -> c2}
Multicolumn[
 TableView[#, Headers -> {{с1, c2, m, n, f}}, Alignment -> Center] & /@
   Table[{c1, c2, m, n, f} //. sol[[1]], {c1, 1, 10, 1},
{c2, 1, 10,1}],2]

Изображения

https://www.youtube.com/watch?v=mCAABYiR9YM

Недавно закончили исследование, которое говорит, что в течение 6 лет можно пить мелатонин ежедневно, это безопасно.

Было бы интересно прочитать оригинальную статью. Может быть кто-нибудь знает её название или DOI?