两幅图像的动态比较: Wolfram语言 11 的新功能

两幅图像的动态比较

利用交互图形用户界面，根据两个关联的 DynamicImage 对象，比较意大利威尼斯的两幅卫星图像. 左边是 ESA 卫星 Sentinel-1 于 2016 年 5 月 10 号拍摄的雷达图像；右边是 Sentinel-2 卫星于 2016 年 4 月 29 号拍摄的光学照片.

In[1]:=

{img1, img2} = {
   Import[
    "https://earth.esa.int/documents/257246/2546936/Venice-Sentinel-1-\
10052016.jpg"],
   Import[
    "https://earth.esa.int/documents/257246/2546936/Venice-Sentinel-2-\
29042016.jpg"]
   };

在其中一幅上使用 click+drag 进行平移，用 Shift+click+drag 进行垂直缩放. 移动滚动条的末端改变视图范围.

显示完整的 Wolfram 语言输入

In[2]:=

DynamicModule[
 {x, y, s},
 Row[{
   DynamicImage[
    img1,
    ZoomCenter -> Dynamic[Scaled[{x, y}]], 
    ZoomFactor -> Dynamic[s],
    AppearanceElements -> {"Pan", "Scrollbars", "ZoomButtons", "Zoom"},
    ImageSize -> {240, 360}
    ],
   DynamicImage[
    img2,
    ZoomCenter -> Dynamic[Scaled[{x, y}]],
    ZoomFactor -> Dynamic[s],
    AppearanceElements -> {"Pan", "Scrollbars", "ZoomButtons", "Zoom"},
    ImageSize -> {240, 360}
    ]
   }]
 ]

播放动画

停止播放动画

Wolfram 语言™

两幅图像的动态比较

相关范例