envi源代码中神经网络分类的代码问题

renzhengqing

神经元网络  ENVI_NEURAL_NET_DOIT

    4: BEGIN

      IF ~KEYWORD_SET(theta) THEN theta = .9

      IF ~KEYWORD_SET(eta) THEN eta = .2

      IF ~KEYWORD_SET(alpha) THEN alpha = .9

      IF ~KEYWORD_SET(act_type) THEN act_type = 0

      IF ~KEYWORD_SET(rms_crit) THEN rms_crit = .1

      IF ~KEYWORD_SET(num_layers) THEN num_layers = 3

      IF ~KEYWORD_SET(num_sweeps) THEN num_sweeps = 10

      

      ENVI_RESTORE_ROIS, roifile

      roi_ids = ENVI_GET_ROI_IDS(fid=fid, $

        roi_colors=lookup, roi_names=class_names)

      ; Set the classification variables

      ;

      num_classes = N_ELEMENTS(roi_ids)

      class_names = ['Unclassified', class_names]

      lookup = REFORM([0,0,0, $

        REFORM(lookup,3*num_classes)],3,num_classes+1)

      ;

      ; Call the doit

      ;

      ENVI_DOIT, 'envi_neural_net_doit', $

        fid=fid, pos=pos, dims=dims, $

        out_name=out_name, rule_out_name='', $

        theta=theta, eta=eta, alpha=alpha, $

        num_classes=num_classes, num_sweeps=num_sweeps, $

        num_layers=num_layers, act_type=act_type, $

        rms_crit=rms_crit, roi_ids=roi_ids, /train, $

        class_names=class_names, lookup=lookup

    END

谁能帮我解释下

lookup = REFORM([0,0,0, $

        REFORM(lookup,3*num_classes)],3,num_classes+1)这句的具体意义呀？尤其是

3*num_classes代表什么

咪斯噶

请问，这些源代码是在哪里找到的呢？