images = imagedataStore（fullfile（toolboxdir（'想象'），'VisionData'那......'校准'那'单核细胞增多症'））;imagefilenames = images.files;

[ImagePoints，BoardSize] =侦探校验erboardPoints（ImageFileNames）;

Squaresize = 29;WorldPoints = GenerateCheckerboards（BoardSize，Squarize）;

i = ReadImage（图像，10）;图像zize = [size（i，1），size（i，2）];params = viemateCameraparameters（观点，WorldPoints，......'图片大小'，图片大小）;

点=侦探探测器板点（i）;

未替代的点= undostortpoints（积分，参数）;

[j，neworigin] = undostortimage（我，params，'OutputView'那'满的'）;

未替代的点= [未置换点（：，1） - 新素（1），......未替代的点（：，2） - 新素（2）];

数字;imshow（i）;抓住在;绘图（点（：，1），点（:,2），'r *  - '）;标题（'检测到的点'）;抓住离开;

数字;imshow（j）;抓住在;绘图（未替代的点（：，1），未置换点（：，2），'G*-'）;标题（'不朽的积分'）;抓住离开;