Package r.data.RArray

Examples of r.data.RArray.Names

737
738
739
740
741
742
743
744
745
746
747
        public RLogical cmp(RString a, RString b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);
            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }

            int n = (na > nb) ? na : nb;
View Full Code Here
773
774
775
776
777
778
779
780
781
782
783
        }
        public RLogical cmp(RComplex a, RComplex b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);
            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }

            int n = (na > nb) ? na : nb;
View Full Code Here
814
815
816
817
818
819
820
821
822
823
824
        public RLogical cmp(RDouble a, RDouble b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);
            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }

            int n = (na > nb) ? na : nb;
View Full Code Here
869
870
871
872
873
874
875
876
877
878
879
        }
        public RLogical cmp(RInt a, RInt b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);

            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }
View Full Code Here
906
907
908
909
910
911
912
913
914
915
916
        }
        public RLogical cmp(RLogical a, RLogical b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);

            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }
View Full Code Here
943
944
945
946
947
948
949
950
951
952
953
        }
        public RLogical cmp(RRaw a, RRaw b, ASTNode ast) {
            int na = a.size();
            int nb = b.size();
            int[] dimensions = Arithmetic.resultDimensions(ast, a, b);
            Names names = Arithmetic.resultNames(ast, a, b);

            if (na == 0 || nb == 0) {
                return RLogical.EMPTY;
            }
View Full Code Here
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
        public static RAny deleteElements(RList base, RLogical index, @SuppressWarnings("unused") ASTNode ast) {
            int bsize = base.size();
            int isize = index.size();

            Names names = base.names();
            RSymbol[] symbols = names == null ? null : names.sequence();
            if (isize == bsize) {
                int ntrue = RLogical.RLogicalUtils.truesInRange(index, 0, isize);
                int nsize = bsize - ntrue;
                RAny[] content = new RAny[nsize];
                RSymbol[] nsymbols = symbols == null ? null : new RSymbol[nsize];
View Full Code Here
3238
3239
3240
3241
3242
3243
3244
3245
3246
3247
3248
            int bsize = base.size();
            int isize = index.size();
            int vsize = typedValue != null ? typedValue.size() : listValue.size();
            int nsize;
            RArray res;
            Names names = base.names();
            boolean expanding;
            if (isize <= bsize) {
                nsize = bsize;
                expanding = false;
                res = Utils.createArray(typedBase, nsize, dimensions, names, base.attributesRef());
View Full Code Here
3344
3345
3346
3347
3348
3349
3350
3351
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361
3362
3363
3364
3365
3366
3367
3368
3369
3370
3371
3372
3373
3374
    }

    public static class StringSelection {

        public static RAny deleteElements(RList base, RString index, @SuppressWarnings("unused") ASTNode ast) {
            Names bnames = base.names();
            if (bnames == null) { return Utils.dropDimensions(base); }
            int bsize = base.size();
            int isize = index.size();
            boolean[] remove = new boolean[bsize];
            int nremove = 0;

            for (int i = 0; i < isize; i++) {
                RSymbol s = RSymbol.getSymbol(index.getString(i));
                int v = bnames.map(s);
                if (v != -1) {
                    if (!remove[v]) {
                        remove[v] = true;
                        nremove++;
                    }
                }
            }

            if (nremove == 0) { return base; }
            int nsize = bsize - nremove;
            RSymbol[] bsymbols = bnames.sequence();
            RSymbol[] nsymbols = new RSymbol[nsize];
            RAny[] content = new RAny[nsize];
            int j = 0;
            for (int i = 0; i < bsize; i++) {
                if (!remove[i]) { // shallow copy
View Full Code Here
3437
3438
3439
3440
3441
3442
3443
3444
3445
3446
3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459
3460
3461
3462
3463
3464
3465
3466
3467
3468
3469
3470
3471
3472
3473
3474
3475
3476
3477
3478
3479
3480
3481
3482
3483
3484
3485
3486
3487
3488
3489
3490
3491
3492
3493
3494
3495
3496
3497
3498
            int vsize = typedValue != null ? typedValue.size() : listValue.size();

            // note that the base can have duplicate names, even though these cannot be created using update vector (like here),
            // they can be created e.g. using names<- or with the c() builtin

            Names bnames = base.names();
            RSymbol[] bsymbols;
            HashMap<RSymbol, Integer> nmap;
            if (bnames == null) {
                nmap = new HashMap<>(bsize);
                bsymbols = null;
            } else {
                assert Utils.check(Names.keepsMap()); // FIXME: re-visit this if we re-introduce names that don't carry hashmaps
                                                      // (probably should build a new one in such a case)
                nmap = new HashMap<>(bnames.getMap());
                bsymbols = bnames.sequence();
            }

            RSymbol[] addSymbols = new RSymbol[isize];
            int j = 0;
            // NOTE: targetOffsets is here to avoid double lookup via the hashmap
            // NOTE: firstOverwrite is here to make targetOffsets smaller in the quite common case that no (or little) new symbols are added
            int firstOverwrite = -1;
            int noverwrites = 0;
            int[] targetOffsets = null;
            for (int i = 0; i < isize; i++) {
                RSymbol name = RSymbol.getSymbol(index.getString(i));
                if (name == RSymbol.EMPTY_SYMBOL || name == RSymbol.NA_SYMBOL) { // these should never go to the map
                    addSymbols[j] = name;
                    if (targetOffsets != null) {
                        targetOffsets[i - firstOverwrite] = j + bsize;
                    }
                    j++;
                } else {
                    Integer prevOffset = nmap.get(name);
                    if (prevOffset == null) {
                        nmap.put(name, j + bsize);
                        addSymbols[j] = name;
                        if (targetOffsets != null) {
                            targetOffsets[i - firstOverwrite] = j + bsize;
                        }
                        j++;
                    } else {
                        if (firstOverwrite == -1) {
                            firstOverwrite = i;
                            targetOffsets = new int[isize - firstOverwrite];
                        }
                        noverwrites++;
                        targetOffsets[i - firstOverwrite] = prevOffset.intValue();
                    }
                }
            }

            int addSize = isize - noverwrites;
            int nsize = bsize + addSize;

            Names nnames;
            if (addSize == 0) {
                nnames = bnames;
            } else if (bsize == 0) {
                nnames = Names.create(addSymbols, nmap);
            } else {
View Full Code Here
TOP

Related Classes of r.data.RArray.Names

  • r.nodes.exec.Arithmetic
  • r.nodes.exec.Arithmetic$EagerVectorArithmetic
  • r.nodes.exec.Arithmetic$LazyVectorArithmetic
  • r.nodes.exec.Comparison$ValueComparison
  • r.nodes.exec.ReadVector$GenericScalarSelection
  • r.nodes.exec.ReadVector$IntSelection
  • r.nodes.exec.ReadVector$LogicalSelection
  • r.nodes.exec.ReadVector$SimpleScalarStringSelection
  • r.nodes.exec.ReadVector$StringSelection
  • r.nodes.exec.ReadVector$Subscript
    • Copyright © 2018 www.massapicom. All rights reserved.
    All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.