小编Mar*_*iya的帖子

我想模糊集群一组工作. 工作属性是:

1. 分类:职位,文凭,技能
2. 数值:薪水,多年的经验

我的问题是:如何计算不同工作之间的距离？
例如job1(程序员,计算机科学,(java,.net,责任),1500,3)
和job2(测试员,bs计算机科学,(黑白盒测试),1200,1)

PS:我是数据挖掘集群的初学者,我非常感谢你的帮助.

我在windows vista上使用padre 0.64作为perl IDE标准输入命令不起作用,我在cmd行上尝试了相同的代码,它确实有效,即

 my $k = <>;
 print $k; 

有办法解决吗？

我得到这个错误:ORA-00904:"M":无效的标识符 - >如果我把('M','F')//单引号我收到此错误消息:PLS-00103:遇到符号"M"期待以下之一:*&= - +; </> at in是mod的余数不是rem返回返回<>或!=或〜=> = <= <>和/或喜欢LIKE2_ LIKE4_ LIKEC_之间使用|| multiset批量成员SUBMULTISET_ - >如果我删除约束,表将正常创建

这是我的代码

EXECUTE IMMEDIATE 'CREATE TABLE dependents
    ( Id    NUMBER(6)
    , FirstName     VARCHAR2(20)
    , LastName      VARCHAR2(25)
     CONSTRAINT     dep_last_name_nn  NOT NULL
    , Birthdate Date
    , Relation VARCHAR2(20)
    , Gender char(1) 
    , RelativeId Number(6) 
    , CONSTRAINT pk_dependent primary key (Id) 
    , CONSTRAINT ck_gender CHECK(Gender in("F","M")) 


    )';         

这段代码是一个if声明; 我想测试是否$rtgene包含trn.我测试了代码$rtgene= nad3:

if ($rtgene!~/trn/){
$end=$data[$i][0]+100;
}
else{
$end =$data[$i][1];
}
print $end;

这是一个不起作用的替代表达式:

($rtgene!~/trn/)? $end=$data[$i][0]+100 : $end=$data[$i][1]; print $end;

问题出现在第一个代码(正常的if else语句)中它起作用并给我预期的结果,但另一个(最后一行)它不起作用; 它总是执行else声明.

问题:这个问题的原因是什么？怎么解决？

我有一个变量$next，其中包含可能包含括号的字符串，例如，trna(tgc)我想做出此匹配的语句if ($data[$i][2]=~/$next/){ ..}，即使实际上是真的，它也总是返回false。我试过了if ($data[$i][2]=~/trnA\(tgc\)/){ ..}，它起作用了。我的问题是：如何将每个括号前面的'\'插入变量$next？

有没有办法在一个中插入多行EXECUTE IMMEDIATE？而不是EXECUTE IMMEDIATE为每个插入写...

这是我的代码来计算perl数组中的uniq值并将它们放在哈希数组中

@array=$_[0];

print Dumper @array;

my %counts;

$counts{$_}++ for @array;
print Dumper(\%counts); 

输出是:

$VAR1 = [
          -46,
          '53',
          11,
          '84',
          -2,
          '47',
          -7,
          '72',
          0,
          '14',
          -10,
          '3',
          -46,
          '53',
          11,
          '84',
          -2,
          '47',
          -7,
          '72',
          0,
          '14',
          -10,
          '3'
        ];
$VAR1 = {
          'ARRAY(0x180c844)' => 1
        };

为什么哈希数组是空的？以及如何计算uniq值？

我通过引用传递一个数组,function(\@charts); 数组图表包含i = 0的哈希数组和i = 1的字符串等等(哈希字符串..)我想将哈希的键存储在@x和@y中的值如下面的函数所示.但是我得到了一个无限循环;它继续打印...

sub function{
print Dumper @_;

    for ($i=0;$i<scalar @{$_[0]} ;$i+2)
    {
    @data= @{$_[$i]};
    $title=$_[$i+1];
    %hash =%{$data[$i]};
    # print Dumper \%hash;
    foreach my $key (sort { $a <=> $b} keys %hash) {
        push (@x,$key);
        push (@y,$hash{$key});
    }

     print Dumper @x;

    }}

输出:

 $VAR1 = [
   {
     '84' => 2,
     '11' => 2,
     '53' => 2,
     '3' => 2,
     '-46' => 2,
     '14' => 2,
     '-7' => 2,
     '47' => 2,
     '-10' => 2,
     '0' => …

您好我有一个矩阵,其中包含浮点数和int数字我想以某种方式将其打印到文件中,如果它不是整数打印浮动后舍入为1的数值.以下是我的代码

use Scalar::Util::Numeric qw(isint);

    for ( $i = 0 ; $i < $#matrix ; $i++ ) {
    for ( $j = 0 ; $j < $#{ $matrix[0] } ; $j++ ) {
        if (not isint $matrix[$i][$j] ) {

            printf MYFILE ("%.1f",$matrix[$i][$j]{score});
        }
        else {
            print MYFILE $matrix[$i][$j]{score}.' ';
        }
    }
    print MYFILE "\n";
}

问题是这个代码输出将所有内容都写为float,即使它是一个整数.怎么解决？

q我在数据框中有一个变量，我t想要limit使用x_axislog10 scale

#t$q
1.000000 2.500000 2.733333 3.032258 1.545455 1.967213 1.176471 1.000000 2.533333 3.136364 1.967213
ggplot(t,aes(x=q))+geom_freqpoly(binwidth=0.1)+scale_x_log10(limits=c(0,1))+scale_y_log10()

我收到这个错误：

Error in if (diff(range) == 0) { : missing value where TRUE/FALSE needed
Error in exists(name, envir = env, mode = mode) : 
  argument "env" is missing, with no default

怎么了？