- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一套。我想创建所有集合,这些集合最多从每个原始集合中获取一个元素。例如,如果我的原始集合是 ((x,y),(A),(1,2))
那么解决方案是:
(x)
(y)
(A)
(1)
(2)
(x,A)
(x,1)
(x,2)
(y,A)
(y,A)
(y,1)
(y,2)
(A,1)
(A,2)
(x,A,1)
(x,A,2)
(y,A,1)
(y,A,2)
我使用我编写的以下代码递归计算:
# gets an array of arrays (aoa)
# returns an array of arrays with all subsets where zero or one element is
# taken from each array, e.g. in = [[a,b],[5],[X,Y,Z]], out =
# [[],[a],[b],[5],[X],[Y],[Z],[a,5],[b,5],[a,X],[a,Y],...,[b,5,Y],[b,5,Z]]
# note the order of elelemnts in each arry is immaterial (an array is
# considered an unordered set)
sub sets_aoa_to_subsets_aoa {
my $aoa = shift // confess;
if ( scalar( @{$aoa} ) == 0 ) {
return [ [] ];
}
my $a = shift @{$aoa};
my $subsets_aoa = sets_aoa_to_subsets_aoa($aoa);
my @new_subsets = ();
foreach my $subset_a ( @{$subsets_aoa} ) {
# leave subset as-is
push @new_subsets, $subset_a;
# add one element from $a
foreach my $e ( @{$a} ) {
push @new_subsets, [ $e, @{$subset_a} ];
}
}
return \@new_subsets;
}
但是,我想对子集的大小添加一个限制。例如,如果我设置 max_size=2
那么最后四个解决方案将被忽略。我不能简单地生成所有解决方案然后过滤那些太大的解决方案,因为有时我有超过 100 个集合,每个集合有 2-3 个元素,而 2^100 不是一个很好的数字来处理,特别是当我只想要的子集时5 码或更小。
最佳答案
正如我所怀疑的,正则表达式适用于此。
这里是针对所提出问题的具体解决方案。有 80 个答案。
my %seen;
"xy=a=12" =~ m{
[^=]* (x|y)* [^=]*
=
[^=]* (a)* [^=]*
=
[^=]* (1|2)* [^=]*
(?{
my $size = grep { length } $1, $2, $3;
print "<$1> <$2> <$3>\n"
if $size >= 1 &&
$size <= 2 &&
! $seen{$1,$2,$3}++;
})
(*FAIL)
}x;
运行传输到 cat -n
的命令,您将看到 80 个答案。
当然,您会想要通用化和可扩展的东西,以便您可以将它应用到您的一百套情况中。制定一个通用的解决方案总是比制定一个特定的解决方案需要更长的时间,所以我会致力于这种概括,并在它看起来不错时尽快回复你。
这是一般的解决方案;这不是我最漂亮的作品,但它确实有用:
#!/usr/bin/perl
use 5.010;
use strict;
use warnings;
our($MIN_PICK, $MAX_PICK) = (1, 2);
our @List_of_Sets = (
[ qw[ x y ] ],
[ qw[ a ] ],
[ qw[ 1 2 ] ],
);
sub dequeue($$) {
my($leader, $body) = @_;
$body =~ s/^\s*\Q$leader\E ?//gm;
return $body;
}
################################
my $gunk = " (?&gunk) ";
my $alter_rx = join("\n\t(?&post)\n" => map {
" $gunk ( "
. join(" | " => map { quotemeta } @$_)
. " ) * $gunk "
} @List_of_Sets);
##print "ALTER_RX <\n$alter_rx\n>\n";
my $string = join(" = ", map { join(" ", @$_) } @List_of_Sets);
##print "STRING: $string\n";
my $numbers_list = join(", " => map { '$' . $_ } 1 .. @List_of_Sets);
my $numbers_bracket = join(" " => map { '<$' . $_ . '>' } 1 .. @List_of_Sets);
my $print_statement = dequeue "|QQ|" => <<"PRINT_STATEMENT";
|QQ|
|QQ| (?{
|QQ| no warnings qw(uninitialized);
|QQ| my \$size = grep { length } $numbers_list;
|QQ| print "$numbers_bracket\\n"
|QQ| if \$size >= $MIN_PICK &&
|QQ| \$size <= $MAX_PICK &&
|QQ| ! \$seen{$numbers_list}++;
|QQ| })
|QQ|
PRINT_STATEMENT
## print "PRINT $print_statement\n";
my $search_rx = do {
use re "eval";
my %seen;
qr{
^
$alter_rx
$
$print_statement
(*FAIL)
(?(DEFINE)
(?<post> = )
(?<gunk> [^=] * )
)
}x;
};
## print qq(SEARCH:\n"$string" =~ $search_rx\n);
# run, run, run!!
$string =~ $search_rx;
我有点担心您希望从中获得多少可能性。可能你应该把我上面概述的这个过程放在管道的另一端,这样你就可以从中读取任何你想要的内容,然后挂断电话,可以这么说,当你读完后.
我意识到这是一个相当不寻常的解决方案;我的代码经常是。 :)
我只是认为您不妨让正则表达式回溯的详尽排列性质为您完成这项工作。
也许其他人会拿出 Some::Abstruse::Module
来为您完成这项工作。你只需要权衡一下你喜欢哪个。
编辑:提高易读性、处理重复项和额外的最小/最大标准。
关于perl - 如何在 Perl 中创建所有大小小于 n 的子集?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/4118613/
这个问题在这里已经有了答案: C sizeof a passed array [duplicate] (7 个回答) 8年前关闭。 在一个函数中,我声明了一个数组: int char_count_ar
简而言之,文件系统如何与 block 设备通信? 最佳答案 我对 block 大小不太了解。我认为 ext4(Linux)的文件系统的 block 大小是 4KB,考虑到现代处理器的页面大小(4KB)
我知道 tinyint(1) 和 tinyint(2) 具有相同的存储空间范围。 唯一的区别是显示宽度不同。这是否意味着 tinyint(1) 将存储所有类型的整数但只正确显示 0 到 9 的范围?而
今晚我已经研究了以下代码几个小时,但我只是摸不着头脑。 当使用函数从标准输入填充数组时,我不断收到“大小 8 的无效写入”和“大小 8 的无效读取”。 如有任何帮助,我们将不胜感激...我知道 Sta
我有一个 valgrind 错误,我不知道如何摆脱它们: ==5685== Invalid read of size 8 ==5685== at 0x4008A1: main (in /home
我对 Hadoop 的概念有点困惑。 Hadoop block 大小、拆分大小和 block 大小 之间有什么区别? 提前致谢。 最佳答案 block 大小和 block 大小相同。 拆分大小 可能与
我想不出一个好的标题,所以希望可以。 我正在做的是创建一个离线 HTML5 webapp。 “出于某些原因”我不希望将某些文件放在缓存 list 中,而是希望将内容放在 localStorage 中。
无法将 xamarin apk 大小减少到 80 MB 以下,已执行以下操作: 启用混淆器 配置:发布 平台:事件(任何 CPU)。 启用 Multi-Dex:true 启用开发人员检测(调试和分析)
我正在开发一个程序,需要将大量 csv 文件(数千个)加载到数组中。 csv 文件的尺寸为 45x100,我想创建一个尺寸为 nx45x100 的 3-d 数组。目前,我使用 pd.read_csv(
Hello World 示例的 React Native APK 大小约为 20M (in recent versions),因为支持不同的硬件架构(ARMv7、ARMv8、X86 等),而同一应用程
我有一个包含 n 个十进制元素的列表,其中每个元素都是两个字节长。 可以说: x = [9000 , 5000 , 2000 , 400] 这个想法是将每个元素拆分为 MSB 和 LSB 并将其存储在
如何设置 GtKTextView 的大小?我想我不能使用 gtk_widget_set_usize。 最佳答案 您不能直接控制小部件的大小,而是由其容器完成。您可以使用 gtk_widget_set_
这个问题在这里已经有了答案: c++ sizeof() of a class with functions (7 个答案) 关闭 5 年前。 结果是 12。 foobar 函数存储在内存中的什么位置
当我在 ffmpeg(或任何其他程序)中使用这样的命令时: ffmpeg -i input.mp4 image%d.jpg 所有图像的组合文件大小总是比视频本身大。我尝试减少每秒帧数、降低压缩设置、模
我是 clojurescript 的新手。 高级编译后出现“77 KB”的javascript文件是否正常? 我有一个 clojurescript 文件: 我正在使用 leinigen: lein c
我想要一个 QPixmap尺寸为 50 x 50。 我试过 : QPixmap watermark(QSize(50,50)); watermark.load(":/icoMenu/preparati
我正在尝试从一篇研究论文中重新创建一个 cnn,但我对深度学习还是个新手。 我得到了一个大小为 32x32x7 的 3d 补丁。我首先想执行一个大小为 3x3 的卷积,具有 32 个特征和步幅为 2。
我一直在尝试调整 View Controller 内的 View 大小,但到目前为止没有运气。基本上,我的 View 最底部有一个按钮,当方向从纵向更改为横向时,该按钮不再可见,因为它现在太靠下了。
如何使用此功能检查图像的尺寸?我只是想在上传之前检查一下... $("#LINK_UPLOAD_PHOTO").submit(function () { var form = $(this);
我用 C++ 完成了这个,因为你可以通过引用传递参数。我无法弄清楚如何在 JavaScript 中执行此操作。我的代码需要更改什么?我的输出是1 this.sizeOfBst = function()
我是一名优秀的程序员,十分优秀!