Search results
Jump to navigation
Jump to search
I, the copyright holder of this work, hereby publish it under the following license: English Animation visualizing the function d(x, y) = (abs(x)^r + abs(y)^r)^(1/r)...(800 × 800 (115 KB)) - 11:05, 6 September 2024
frames = Table[ tmp = NIntegrate[2/p (u^(1 - p) + (1 - u)^(1 - p))^(1/p), {u, 0, 1}]; ContourPlot[Evaluate[Norm[{x, y}, p]] == 1, {x, -1.3, 1.3}, {y, -1...(480 × 480 (2.03 MB)) - 06:39, 17 March 2022
