kiyo_hiko https://blog.hatena.ne.jp/kiyo_hiko/ kiyo_hikoのブログ https://kiyohikou.hateblo.jp/ なんとなく思いついたメモル。思いついただけで試してない例えば売り上げ10万以上あった連続する日付の出現回数カウントしてみる。 カウント部分は述語分けとくと応用力あってラクい my @gts = qw/108000 99500 75600 112000 85600/; sub countTerms { (2 < @_) or return; my ($fun, $car, @cdr) = @_; my ($n, $con) = $fun->($car) ? (1, 1) : (0, 0); for (@cdr) {! $con and ($con = $fun->($_)) and $n++} … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkiyohikou.hateblo.jp%2Fentry%2F2014%2F09%2F26%2F194912" title="データの集合から条件を満たす部分集合の出現回数を求める - kiyo_hikoのブログ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2014-09-26 19:49:12 rich https://kiyohikou.hateblo.jp/entry/2014/09/26/194912 1.0 100%