[#16113] Strange idea... exporting from a scope — "Hal E. Fulton" <hal9000@...>

Hello...

33 messages 2001/06/01

[#16364] Re: Garbage Collection? — Michael Davis <mdavis@...>

Windows 2000 and linux (RedHat 6.2). I have run these tests on both OSs.

12 messages 2001/06/09

[#16400] Symbolic Computation III — Mathieu Bouchard <matju@...>

14 messages 2001/06/11

[#16502] Playing with Ruby Syntax (was: Initial thoughts about Ruby From a Smalltalk Programmer) — jweirich@...

Michael> Hi Everyone, I have to say I'm utterly fascinated by Ruby

9 messages 2001/06/15

[#16661] Problem running irb with Ruby 1.6.4 under FreeBSD 4.0 — Bob Alexander <balexander@...>

I've installed Ruby 1.6.4 on a FreeBSD 4.0 machine, and get the

11 messages 2001/06/20

[#16686] opening db files made by apache dbmmanage — Fritz Heinrichmeyer <fritz.heinrichmeyer@...>

14 messages 2001/06/21

[#16801] rb_define_class() vs Class.new() — Kero van Gelder <kero@...4050.upc-d.chello.nl>

Hi,

18 messages 2001/06/23
[#16802] Re: rb_define_class() vs Class.new() — ts <decoux@...> 2001/06/23

>>>>> "K" == Kero van Gelder <kero@d4050.upc-d.chello.nl> writes:

[#16841] RE: national characters is strings — "Aleksei Guzev" <aleksei.guzev@...>

Next week I'll try to rebuild Ruby with Unicode strings. But it would be

15 messages 2001/06/25
[#16842] Re: national characters is strings — matz@... (Yukihiro Matsumoto) 2001/06/25

Hi,

[#16843] Re: national characters is strings — "Aleksei Guzev" <aleksei.guzev@...> 2001/06/25

That's good enough. But I'm afraid this could ( not would ) cause string

[#16868] Something strange with Ruby's inheritance mechanism — Eric Jacoboni <jaco@...>

As Ruby beginner, i try some "canonical" OO scripts. Doing so, I've

14 messages 2001/06/25
[#16873] RE: Something strange with Ruby's inheritance mechanism — "Aleksei Guzev" <aleksei.guzev@...> 2001/06/26

[#16879] Re: Something strange with Ruby's inheritance mechanism — Mathieu Bouchard <matju@...> 2001/06/26

On Tue, 26 Jun 2001, Aleksei Guzev wrote:

[#16869] Something strange with Ruby's inheritance mechanism — Eric Jacoboni <jaco@...>

As Ruby beginner, i try some "canonical" OO scripts. Doing so, I've

12 messages 2001/06/25

[#16881] — "Aleksei Guzev" <aleksei.guzev@...>

32 messages 2001/06/26
[#16916] Re: Method overloading (option) Was: Re: — "Wayne Blair" <wayne.blair@...> 2001/06/26

[#16920] Re: Method overloading (option) Was: Re: — matz@... (Yukihiro Matsumoto) 2001/06/26

Hi,

[#16888] finalizers, destructors and whatnot — "David Leal" <david@...>

Hi all,

16 messages 2001/06/26

[#17037] keeping an Exception object alive — David Alan Black <dblack@...>

Hello --

19 messages 2001/06/28
[#17055] Re: keeping an Exception object alive — matz@... (Yukihiro Matsumoto) 2001/06/29

Hi,

[#17066] RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — David Alan Black <dblack@...> 2001/06/29

Hello --

[#17076] Re: RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — matz@... (Yukihiro Matsumoto) 2001/06/29

Hi,

[#17079] Re: RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — David Alan Black <dblack@...> 2001/06/29

Hello --

[#17138] Re: RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — matz@... (Yukihiro Matsumoto) 2001/07/02

Hi,

[#17141] Re: RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — David Alan Black <dblack@...> 2001/07/02

Hello --

[#17142] Re: RCR: Exception methods (was: Re: Re: keeping an Exception object alive) — ts <decoux@...> 2001/07/02

>>>>> "D" == David Alan Black <dblack@candle.superlink.net> writes:

[ruby-talk:16671] Re: bag difference

From: "HarryO" <harryo@...>
Date: 2001-06-21 00:20:48 UTC
List: ruby-talk #16671
In article <p86Y6.80058$Ne5.3134820@e420r-sjo3.usenetserver.com>, "Niklas
Frykholm" <niklas@kagi.com> wrote:


> On Thu, Jun 21, 2001 at 02:56:51AM +0900, Hugh Sasse Staff Elec Eng
> wrote:
>> Is there an elegant way to do a bag diffeence between 2 arrays, rather
>> than a set difference?
>> [1,1,1,2,3,3,4,4,4] <something> [1,2,3,4,4] gives: [1,1,3,4]
>> If ordering is preserved that would be great.
> Don't know if this is the most elegant solution, but it is the first
> that comes to my mind.
> 
>     class Array
>         def with_count
>             h = {}; h.default = 0
>             self.collect {|x| [x, h[x] += 1]}
>         end
>         def bagminus(other)
>             (self.with_count - other.with_count).collect {|x| x[0]}
>         end
>     end
> 
>     a = [1,1,1,2,3,3,4,4,4]
>     b = [1,2,3,4,4]
> 
>     p a.bagminus b # --> [1, 1, 3, 4]
> // Niklas

I plan to read this carefully when I have time, but here's what I came up
with.  It's slightly more verbose, but I think an Array#delete_first()
would be useful, which is a bonus.  How efficient it is depends on how
efficient Array#index and Array#delete_at are, but I would guess they're
very simple.

class Array
 
    def delete_first(x)
 
        if (i = self.index(x))
            self.delete_at(i)
        end
 
    end
 
    def bag_minus(other)
 
        difference = Array.new
        unwanted  = other.clone
 
        self.each do |x|
            if !unwanted.delete_first(x)
                difference.push(x)
            end
        end
 
        return difference
    end
 
end
 
a = [0,0,1,1,1,2,2,3,3,3,3,4,4,5,5,6]
b = [1,2,3,3,4]
 
puts "#{a}.bag_minus(#{b}) = #{a.bag_minus(b)}" # -->
[0,0,1,1,2,3,3,4,5,5,6]

In This Thread