亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

  免費(fèi)注冊(cè) 查看新帖 |

Chinaunix

  平臺(tái) 論壇 博客 文庫(kù)
最近訪問(wèn)板塊 發(fā)新帖
查看: 4036 | 回復(fù): 5
打印 上一主題 下一主題

求一多維數(shù)組接近的算法。 [復(fù)制鏈接]

論壇徽章:
0
跳轉(zhuǎn)到指定樓層
1 [收藏(0)] [報(bào)告]
發(fā)表于 2018-03-16 16:56 |只看該作者 |倒序?yàn)g覽
5可用積分
RT

A=[3, -1, 4]

B = numpy.array([1,1,1],
                           [1,-1,1],
                           [1,1, -1])

A 在數(shù)組B中最接近的是 [1, -1, 1], 比較條件:正負(fù)的權(quán)重大于加減,這句話說(shuō)明白了吧。

B1 = numpy.array([1,1,1],
                           [1,-1,1],
                           [1,1, -1],
                           [3,1,4])     結(jié)果還是[1,-1,1]。因?yàn)榧訙p沒(méi)有全匹配到。


數(shù)字中沒(méi)有0.

最佳答案

查看完整內(nèi)容

2, -1, 3 是自己加上去的。

論壇徽章:
12
子鼠
日期:2014-10-11 16:46:482016科比退役紀(jì)念章
日期:2018-03-16 10:24:0515-16賽季CBA聯(lián)賽之山東
日期:2017-11-10 14:32:142016科比退役紀(jì)念章
日期:2017-09-02 15:42:4715-16賽季CBA聯(lián)賽之佛山
日期:2017-08-28 17:11:5515-16賽季CBA聯(lián)賽之浙江
日期:2017-08-24 16:55:1715-16賽季CBA聯(lián)賽之青島
日期:2017-08-17 19:55:2415-16賽季CBA聯(lián)賽之天津
日期:2017-06-29 10:34:4315-16賽季CBA聯(lián)賽之四川
日期:2017-05-16 16:38:55黑曼巴
日期:2016-07-19 15:03:112015亞冠之薩濟(jì)拖拉機(jī)
日期:2015-05-22 11:38:5315-16賽季CBA聯(lián)賽之北京
日期:2019-08-13 17:30:53
2 [報(bào)告]
發(fā)表于 2018-03-16 16:56 |只看該作者
本帖最后由 523066680 于 2018-03-17 15:32 編輯
  1. my $A = [3, -1, 4];

  2. my $B = [
  3.     [1, 1, 1],
  4.     [1,-1, 1],
  5.     [2,-1, 3],
  6.     [1, 1,-1],
  7.     [3, 1, 4]
  8.    ];

  9. # 估值
  10. my @esta;
  11. my @estb;
  12. my $e_a;
  13. my $e_b;

  14. for my $subset ( @$B )
  15. {
  16.     $e_a = 0;
  17.     $e_b = 0;
  18.     for my $id ( 0 .. $#$A )
  19.     {
  20.         $e_a ++ if ( $subset->[$id] / $A->[$id] < 0 );   # 若正負(fù)相反,估值變大
  21.         $e_b += ($subset->[$id] - $A->[$id])**2;         # 分量距離作為估值
  22.     }

  23.     push @esta, $e_a;
  24.     push @estb, sqrt($e_b);
  25. }

  26. # 顯示各組估值情況
  27. for my $id ( 0..$#esta )
  28. {
  29.     printf "%4.1f %4.1f %4.1f  ", @{$B->[$id]};
  30.     printf "esta: %d estb: %.3f\n", $esta[$id], $estb[$id];
  31. }

  32. # 分級(jí)排序,正負(fù)估值優(yōu)先,向量距離其次
  33. my @order=
  34.     sort
  35.     {
  36.         $esta[$a] <=> $esta[$b] ||
  37.         $estb[$a] <=> $estb[$b]
  38.     } ( 0 .. $#esta );

  39. my $best = $order[0];

  40. # 結(jié)果
  41. printf "\nBest: %s\n", join(", ", @{ $B->[$best] } );
復(fù)制代碼


2, -1, 3 是自己加上去的。

1.0  1.0  1.0  esta: 1 estb: 4.123
1.0 -1.0  1.0  esta: 0 estb: 3.606
2.0 -1.0  3.0  esta: 0 estb: 1.414
1.0  1.0 -1.0  esta: 2 estb: 5.745
3.0  1.0  4.0  esta: 1 estb: 2.000

Best: 2, -1, 3

論壇徽章:
42
19周年集字徽章-周
日期:2019-10-14 14:35:31平安夜徽章
日期:2015-12-26 00:06:30數(shù)據(jù)庫(kù)技術(shù)版塊每日發(fā)帖之星
日期:2015-12-01 06:20:002015亞冠之首爾
日期:2015-11-04 22:25:43IT運(yùn)維版塊每日發(fā)帖之星
日期:2015-08-17 06:20:00寅虎
日期:2014-06-04 16:25:27獅子座
日期:2014-05-12 11:00:00辰龍
日期:2013-12-20 17:07:19射手座
日期:2013-10-24 21:01:23CU十二周年紀(jì)念徽章
日期:2013-10-24 15:41:34IT運(yùn)維版塊每日發(fā)帖之星
日期:2016-01-27 06:20:0015-16賽季CBA聯(lián)賽之新疆
日期:2016-06-07 14:10:01
3 [報(bào)告]
發(fā)表于 2018-03-16 18:35 |只看該作者
這個(gè)需求還是說(shuō)不清,
[-1,-1,1]和[1,-1,-1]哪個(gè)更接近?  如果沒(méi)有正好匹配的,哪個(gè)更接近?
[1,-1,1]和[2,-2,1]哪個(gè)更接近?   正負(fù)匹配, 加減也一樣,怎么算?

論壇徽章:
0
4 [報(bào)告]
發(fā)表于 2018-03-17 12:10 |只看該作者
回復(fù) 2# laputa73

看來(lái)是我沒(méi)說(shuō)清楚。重點(diǎn)考慮正負(fù),沒(méi)有沒(méi)有正負(fù),返回沒(méi)有匹配到,匹配到正負(fù)后,算出最接近得

論壇徽章:
0
5 [報(bào)告]
發(fā)表于 2018-03-17 14:45 |只看該作者
回復(fù) 2# 523066680

多多感謝

論壇徽章:
0
6 [報(bào)告]
發(fā)表于 2018-03-19 09:55 |只看該作者
A = np.array([3,-1, 4])

B = np.array([[1,1,1],[1,-1,1],[1,1,-1]])

# distances array-wise
np.abs(B - A)

# sum of absolute values of distances (smallest is closest)
np.sum(np.abs(B - A), axis=1)

# index of smallest (in this case index 1)
np.argmin(np.sum(np.abs(B - A), axis=1))

# all in one line (take array 1 from B)
result = B[np.argmin(np.sum(np.abs(B - A), axis=1))]
您需要登錄后才可以回帖 登錄 | 注冊(cè)

本版積分規(guī)則 發(fā)表回復(fù)

  

北京盛拓優(yōu)訊信息技術(shù)有限公司. 版權(quán)所有 京ICP備16024965號(hào)-6 北京市公安局海淀分局網(wǎng)監(jiān)中心備案編號(hào):11010802020122 niuxiaotong@pcpop.com 17352615567
未成年舉報(bào)專區(qū)
中國(guó)互聯(lián)網(wǎng)協(xié)會(huì)會(huì)員  聯(lián)系我們:huangweiwei@itpub.net
感謝所有關(guān)心和支持過(guò)ChinaUnix的朋友們 轉(zhuǎn)載本站內(nèi)容請(qǐng)注明原作者名及出處

清除 Cookies - ChinaUnix - Archiver - WAP - TOP