我正在研究一个项目,我希望显示一个看起来像条形图的单线直方图,条形图中的每一行代表一个像素及其灰度值.
我有一个充满灰度值的数组,我只需要将它们放入这个直方图并让它显示代表值的行......有点像这样
IMAGE [minimize][maximize][close]
picture histogram
I
(Loaded Picture) I I
I I I
I I I I
[open][save]
Run Code Online (Sandbox Code Playgroud)
下面是加载数组的代码......我只需要获得一些将使用这些灰度值的代码,并将它们表示为上面的条形图.
public void showImage(File fileName) {
Scanner scan;
try {
scan = new Scanner(fileName);
typefile = scan.next();
iname = scan.next();
width = scan.nextInt();
height = scan.nextInt();
maxshade = scan.nextInt();
array = new int[width][height];
for(int r = 0; r < array.length; r++){
for(int c = 0; c < array[r].length; c++){
array[r][c] = scan.nextInt();
imageArray = array;
repaint();
} catch (FileNotFoundException e) { …Run Code Online (Sandbox Code Playgroud) 为什么当它显然将它添加到lst时总是返回nil ???
请帮忙!
谢谢!
CL-USER 1 : 1 > (defun constants-aux (form lst)
(cond ((null form) lst)
((eq (car form) 'implies) (constants-aux (cdr form) lst))
((eq (car form) 'not) (constants-aux (cdr form) lst))
((eq (car form) 'and) (constants-aux (cdr form) lst))
((eq (car form) 'or) (constants-aux (cdr form) lst))
((atom (car form)) (print (car form)) (cons (car form) (list lst)) (delete-duplicates lst) (constants-aux (cdr form) lst))
(T (constants-aux (car form) lst) (constants-aux (cdr form) lst))))
CONSTANTS-AUX
CL-USER 2 : 1 …Run Code Online (Sandbox Code Playgroud)