Implement method of And (and &) for use with segment related classes

For example:

``` r
Segment(Expr(~pagepath %matches% "products")) & Segment(Expr(~source == "google"))
```

Should be equivalent to:

``` r
Segment(Include(Expr(~pagepath %matches% "products")), Include(Expr(~source == "google")))
```
