将数字水印信息嵌入 Lena 图像的第 1 至 3 个位平面中，可以达到不易察觉的目的，给出matlab代码

以下是一段Matlab代码示例，用于将数字水印信息嵌入Lena图像的第1至3个位平面中。

% 读取Lena图像
lena = imread('lena.png');

% 将Lena图像转换为灰度图像
lena_gray = rgb2gray(lena);

% 将灰度图像转换为二进制图像
lena_binary = imbinarize(lena_gray);

% 生成数字水印信息，例如"0123456789"
watermark = '0123456789';

% 将数字水印信息转换为二进制序列
watermark_binary = de2bi(double(watermark), 8, 'left-msb');
watermark_binary = watermark_binary(:);

% 将数字水印信息嵌入Lena图像的第1至3个位平面中
lena_stego = lena_binary;
lena_stego(1:3:end) = bitset(lena_stego(1:3:end), 1, watermark_binary);
lena_stego(2:3:end) = bitset(lena_stego(2:3:end), 2, watermark_binary);
lena_stego(3:3:end) = bitset(lena_stego(3:3:end), 3, watermark_binary);

% 将嵌入数字水印信息后的二进制图像转换为灰度图像
lena_stego_gray = uint8(lena_stego)*255;

% 显示原始Lena图像和嵌入数字水印信息后的Lena图像
figure;
subplot(1,2,1);
imshow(lena_gray);
title('Original Lena Image');
subplot(1,2,2);
imshow(lena_stego_gray);
title('Stego Lena Image');

需要注意的是，以上代码仅为示例，实际应用中需要根据具体需求进行调整和改进。