Use code below to re-create and visualize this issue.
% Generate Macbeth scene with D65 illuminant
fluorescentScene = sceneCreate('macbethfluorescent');
illuminantPhotons = sceneGet(fluorescentScene, 'illuminantPhotons');
peakRadiance = sceneGet(fluorescentScene, 'peakRadiance');
photonRadianceMap = sceneGet(fluorescentScene,'photons');
wavelengthSampling = sceneGet(fluorescentScene, 'wave');
figure(11); clf;
subplot(3,3,1); hold on;
plot(wavelengthSampling, illuminantPhotons, 'r-');
plot(wavelengthSampling, peakRadiance, 'k-');
legend('illuminant photons', 'peak radiance');
set(gca, 'FontSize', 12);
title('fluorescent macbeth');
wavelengthSubSamplingInterval = 2;
subplot(3,3, [2 3]);
plotRadianceMap(photonRadianceMap, wavelengthSampling, wavelengthSubSamplingInterval, 'Radiance')
set(gca, 'FontSize', 12);
% Generate Macbeth scene with D65 illuminant
d65Scene = sceneCreate('macbethd65');
illuminantPhotons2 = sceneGet(d65Scene, 'illuminantPhotons');
peakRadiance2 = sceneGet(d65Scene, 'peakRadiance');
photonRadianceMap2 = sceneGet(d65Scene,'photons');
wavelengthSampling2 = sceneGet(d65Scene, 'wave');
subplot(3,3,4); hold on;
plot(wavelengthSampling2, illuminantPhotons2, 'r-');
plot(wavelengthSampling2, peakRadiance2, 'k-');
legend('illuminant photons', 'peak radiance');
set(gca, 'FontSize', 12);
title('D65 macbeth');
subplot(3,3, [5 6]);
plotRadianceMap(photonRadianceMap2, wavelengthSampling2, wavelengthSubSamplingInterval, 'Radiance')
set(gca, 'FontSize', 12);
% Change illuminant in macbeth d65 scene
fluorescentIllum = sceneGet(fluorescentScene, 'illuminant');
d65Scene = sceneSet(d65Scene, 'illuminant', fluorescentIllum);
illuminantPhotons3 = sceneGet(d65Scene, 'illuminantPhotons');
peakRadiance3 = sceneGet(d65Scene, 'peakRadiance');
photonRadianceMap3 = sceneGet(d65Scene,'photons');
wavelengthSampling3 = sceneGet(d65Scene, 'wave');
subplot(3,3,7); hold on;
plot(wavelengthSampling3, illuminantPhotons3, 'r-');
plot(wavelengthSampling3, peakRadiance3, 'k-');
legend('illuminant photons', 'peak radiance');
title(sprintf('D65 macbeth re-illuminated \nwith fluorescent illuminant'));
set(gca, 'FontSize', 12);
subplot(3,3, [8 9]);
plotRadianceMap(photonRadianceMap3, wavelengthSampling3, wavelengthSubSamplingInterval, 'Radiance')
set(gca, 'FontSize', 12);
function plotRadianceMap(radianceMap, wavelengthSampling, wavelengthSubSamplingInterval, titleText)
[X,Y,Z] = meshgrid(1:size(radianceMap,2), wavelengthSampling, 1:size(radianceMap,1));
radianceMap = permute(radianceMap, [3 2 1]);
minRadiance = min(radianceMap(:));
maxRadiance = max(radianceMap(:));
radianceMap = radianceMap/maxRadiance;
h = slice(X,Y,Z, radianceMap, Inf, wavelengthSampling(1):wavelengthSubSamplingInterval:wavelengthSampling(end), Inf, 'nearest');
for n = 1:numel(h)
a = get(h(n), 'cdata');
set(h(n), 'alphadata', 0.1*ones(size(a)), 'facealpha', 'flat');
end
shading flat
axis 'image'
set(gca, 'ZDir', 'reverse', 'Color', [1 1 0.6]);
set(gca, 'FontName', 'Helvetica', 'FontSize', 14, 'FontWeight', 'bold');
xlabel('x'); ylabel('wavelength'); zlabel('y');
title(titleText);
colormap(hot(256));
colorbar('vert', 'Ticks', [min(radianceMap(:)) max(radianceMap(:))], 'TickLabels', [0 1.0]*(maxRadiance-minRadiance) + minRadiance);
box off;
grid off;
end