support images with reversed axes

CHANGELOG.md

@@ -2,6 +2,7 @@
 
 ## [Unreleased]
 
+- Support images with reversed axes [#3989](https://github.com/MakieOrg/Makie.jl/pull/3989)
 - Introduce stroke_depth_shift + forward normal depth_shift for Poly [#4058](https://github.com/MakieOrg/Makie.jl/pull/4058).
 - Use linestyle for Poly and Density legend elements [#4000](https://github.com/MakieOrg/Makie.jl/pull/4000).
 - Bring back interpolation attribute for surface [#4056](https://github.com/MakieOrg/Makie.jl/pull/4056).

CairoMakie/src/primitives.jl

@@ -784,6 +784,10 @@ end
 
 regularly_spaced_array_to_range(arr::AbstractRange) = arr
 
+image_axis(xs::AbstractVector, N) = regularly_spaced_array_to_range(xs)
+image_axis(xs::Makie.Interval, N) = range(Makie.endpoints(xs)..., length = N+1)
+image_axis(xs, N) = range(extrema(xs)..., length = N+1)
+
 function premultiplied_rgba(a::AbstractArray{<:ColorAlpha})
     map(premultiplied_rgba, a)
 end
@@ -796,20 +800,8 @@ function draw_atomic(scene::Scene, screen::Screen{RT}, @nospecialize(primitive::
     ctx = screen.context
     image = primitive[3][]
     xs, ys = primitive[1][], primitive[2][]
-    if !(xs isa AbstractVector)
-        l, r = extrema(xs)
-        N = size(image, 1)
-        xs = range(l, r, length = N+1)
-    else
-        xs = regularly_spaced_array_to_range(xs)
-    end
-    if !(ys isa AbstractVector)
-        l, r = extrema(ys)
-        N = size(image, 2)
-        ys = range(l, r, length = N+1)
-    else
-        ys = regularly_spaced_array_to_range(ys)
-    end
+    xs = image_axis(xs, size(image, 1))
+    ys = image_axis(ys, size(image, 2))
     model = primitive.model[]::Mat4d
     interpolate = to_value(primitive.interpolate)
 

GLMakie/src/drawing_primitives.jl

@@ -629,8 +629,8 @@ end
 function draw_atomic(screen::Screen, scene::Scene, plot::Image)
     return cached_robj!(screen, scene, plot) do gl_attributes
         position = lift(plot, plot[1], plot[2]) do x, y
-            xmin, xmax = extrema(x)
-            ymin, ymax = extrema(y)
+            xmin, xmax = Makie.endpoints(x)
+            ymin, ymax = Makie.endpoints(y)
             rect =  Rect2(xmin, ymin, xmax - xmin, ymax - ymin)
             return decompose(Point2d, rect)
         end

ReferenceTests/src/tests/primitives.jl

@@ -703,3 +703,25 @@ end
 
     fig
 end
+
+@reference_test "Reverse heatmap axes" begin
+    img = [2 0 0 3; 0 0 0 0; 1 1 0 0; 1 1 0 4]
+
+    f = Figure()
+    heatmap(f[1, 1], 1:4, 1:4, img, colormap = :viridis)
+    heatmap(f[2, 1], 1:4, 4..1, img, colormap = :viridis)
+    heatmap(f[1, 2], 4:-1:1, 1:4, img, colormap = :viridis)
+    heatmap(f[2, 2], 4:-1:1, [4, 3, 2, 1], img, colormap = :viridis)
+    f
+end
+
+@reference_test "Reverse image axes" begin
+    img = [2 0 0 3; 0 0 0 0; 1 1 0 0; 1 1 0 4]
+
+    f = Figure()
+    image(f[1, 1], 1:4, 1:4, img, colormap = :viridis)
+    image(f[2, 1], 1:4, 4..1, img, colormap = :viridis)
+    image(f[1, 2], 4:-1:1, 1:4, img, colormap = :viridis)
+    image(f[2, 2], 4:-1:1, [4, 3, 2, 1], img, colormap = :viridis)
+    f
+end

src/conversions.jl

@@ -363,8 +363,9 @@
 end
 
 to_interval(x::Tuple{<: Real, <: Real}) = float_convert(x[1]) .. float_convert(x[2])
-function to_interval(x::Union{Interval,AbstractVector,ClosedInterval})
-    return float_convert(minimum(x)) .. float_convert(maximum(x))
+to_interval(x::Interval) = float_convert(leftendpoint(x)) .. float_convert(rightendpoint(x))
+function to_interval(x::Union{AbstractVector})
+    return float_convert(first(x)) .. float_convert(last(x))
 end
 
 
@@ -652,7 +653,8 @@
 #                               Helper Functions                               #
 ################################################################################
 
-to_linspace(interval, N) = range(minimum(interval), stop = maximum(interval), length = N)
+to_linspace(interval::Interval, N) = range(leftendpoint(interval), stop = rightendpoint(interval), length = N)
+to_linspace(x, N) = range(first(x), stop = last(x), length = N)
 
 """
 Converts the element array type to `T1` without making a copy if the element type matches

src/layouting/data_limits.jl

@@ -214,8 +214,8 @@
 scalarmin(x::Union{Tuple, AbstractArray}, y::Union{Tuple, AbstractArray}) = min.(x, y)
 scalarmin(x, y) = min(x, y)
 
-extrema_nan(itr::Pair) = (itr[1], itr[2])
-extrema_nan(itr::ClosedInterval) = (minimum(itr), maximum(itr))
+extrema_nan(itr::Pair) = minmax(itr[1], itr[2])
+extrema_nan(itr::ClosedInterval) = minmax(endpoints(itr)...)
 function extrema_nan(itr)
     vs = iterate(itr)
     vs === nothing && return (NaN, NaN)

test/boundingboxes.jl

@@ -92,6 +92,11 @@ end
     @test bb.origin ≈ Point3f(0)
     @test bb.widths ≈ Vec3f(10.0, 10.0, 0)
 
+    fig, ax, p = image(1..0, 1:10, rand(10, 10))
+    bb = boundingbox(p)
+    @test bb.origin ≈ Point3f(0, 1, 0)
+    @test bb.widths ≈ Vec3f(1.0, 9.0, 0)
+
     # text transforms to pixel space atm (TODO)
     fig = Figure(size = (400, 400))
     ax = Axis(fig[1, 1])

test/conversions.jl

@@ -335,9 +335,11 @@ end
 
     v1 = collect(1:10)
     v2 = collect(1:6)
+    v3 = reverse(v1)
 
     i1 = 1..10
     i2 = 1..6
+    i3 = 10..1
 
     o3 = Float32.(m3)
 
@@ -346,6 +348,8 @@ end
         @test convert_arguments(Image, m3)         == (0f0..10f0, 0f0..6f0, o3)
         @test convert_arguments(Image, v1, r2, m3) == (1f0..10f0, 1f0..6f0, o3)
         @test convert_arguments(Image, i1, v2, m3) == (1f0..10f0, 1f0..6f0, o3)
+        @test convert_arguments(Image, v3, i1, m3) == (1.0..10.0, 1.0..10.0, o3)
+        @test convert_arguments(Image, v1, i3, m3) == (1.0..10.0, 10.0..1.0, o3)
         @test convert_arguments(Image, m1, m2, m3) === (m1, m2, m3)
         @test convert_arguments(Heatmap, m1, m2) === (m1, m2)
     end