inline-r-1.0.2: Seamlessly call R from Haskell and vice versa. No FFI required.
Copyright(C) 2013 Amgen Inc.
2016 Tweag I/O Limited.
Safe HaskellNone
LanguageHaskell2010

Data.Vector.SEXP.Mutable

Description

Vectors that can be passed to and from R with no copying at all. These vectors are wrappers over SEXP vectors used by R. Memory for vectors is allocated from the R heap, and in such way that they can be converted to a SEXP by simple pointer arithmetic (see toSEXP).

Like Data.Vector.Storable.Mutable vectors, the vector type in this module adds one extra level of indirection and a small amount of storage overhead for maintainging lengths and slice offsets. If you're keeping a very large number of tiny vectors in memory, you're better off keeping them as SEXPs and calling fromSEXP on-the-fly.

Synopsis

Mutable slices of SEXP vector types

data MVector s (ty :: SEXPTYPE) a Source #

Mutable R vector. Represented in memory with the same header as SEXP nodes. The second type parameter is phantom, reflecting at the type level the tag of the vector when viewed as a SEXP. The tag of the vector and the representation type are related via ElemRep.

Instances

Instances details
VECTOR V ty a => Literal (MVector V ty a) ty Source # 
Instance details

Defined in Language.R.Literal

Methods

mkSEXPIO :: MVector V ty a -> IO (SEXP V ty) Source #

fromSEXP :: SEXP s ty -> MVector V ty a Source #

fromSEXP :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => SEXP s ty -> MVector s ty a Source #

O(1) Create a vector from a SEXP.

toSEXP :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> m (SEXP (Region m) ty) Source #

O(1) in the common case, O(n) for proper slices. Convert a mutable vector to a SEXP. This can be done efficiently, without copy, because vectors in this module always include a SEXP header immediately before the vector data in memory.

release :: forall s' s (ty :: SEXPTYPE) a. s' <= s => MVector s ty a -> MVector s' ty a Source #

unsafeRelease :: forall s (ty :: SEXPTYPE) a s'. MVector s ty a -> MVector s' ty a Source #

Accessors

Length information

length :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> Int Source #

Length of the mutable vector.

null :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> Bool Source #

Check whether the vector is empty.

Construction

Initialisation

new :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => Int -> m (MVector (Region m) ty a) Source #

Create a mutable vector of the given length.

unsafeNew :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => Int -> m (MVector (Region m) ty a) Source #

Create a mutable vector of the given length. The length is not checked.

replicate :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => Int -> a -> m (MVector (Region m) ty a) Source #

Create a mutable vector of the given length (0 if the length is negative) and fill it with an initial value.

replicateM :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => Int -> m a -> m (MVector (Region m) ty a) Source #

Create a mutable vector of the given length (0 if the length is negative) and fill it with values produced by repeatedly executing the monadic action.

clone :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> m (MVector (Region m) ty a) Source #

Create a copy of a mutable vector.

Extracting subvectors

slice :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> Int -> MVector s ty a -> MVector s ty a Source #

Yield a part of the mutable vector without copying it.

init :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> MVector s ty a Source #

tail :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> MVector s ty a Source #

take :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> MVector s ty a -> MVector s ty a Source #

drop :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> MVector s ty a -> MVector s ty a Source #

splitAt :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> MVector s ty a -> (MVector s ty a, MVector s ty a) Source #

unsafeSlice Source #

Arguments

:: forall s (ty :: SEXPTYPE) a. VECTOR s ty a 
=> Int

starting index

-> Int

length of the slice

-> MVector s ty a 
-> MVector s ty a 

Yield a part of the mutable vector without copying it. No bounds checks are performed.

unsafeInit :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> MVector s ty a Source #

unsafeTail :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> MVector s ty a Source #

unsafeTake :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> MVector s ty a -> MVector s ty a Source #

unsafeDrop :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => Int -> MVector s ty a -> MVector s ty a Source #

Overlapping

overlaps :: forall s (ty :: SEXPTYPE) a. VECTOR s ty a => MVector s ty a -> MVector s ty a -> Bool Source #

Check whether two vectors overlap.

Restricting memory usage

clear :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> m () Source #

Reset all elements of the vector to some undefined value, clearing all references to external objects. This is usually a noop for unboxed vectors.

Accessing individual elements

read :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> m a Source #

Yield the element at the given position.

write :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> a -> m () Source #

Replace the element at the given position.

swap :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> Int -> m () Source #

Swap the elements at the given positions.

unsafeRead :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> m a Source #

Yield the element at the given position. No bounds checks are performed.

unsafeWrite :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> a -> m () Source #

Replace the element at the given position. No bounds checks are performed.

unsafeSwap :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> Int -> Int -> m () Source #

Swap the elements at the given positions. No bounds checks are performed.

Modifying vectors

Filling and copying

set :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> a -> m () Source #

Set all elements of the vector to the given value.

copy :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> MVector (Region m) ty a -> m () Source #

Copy a vector. The two vectors must have the same length and may not overlap.

move :: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) => MVector (Region m) ty a -> MVector (Region m) ty a -> m () Source #

Move the contents of a vector. The two vectors must have the same length.

If the vectors do not overlap, then this is equivalent to copy. Otherwise, the copying is performed as if the source vector were copied to a temporary vector and then the temporary vector was copied to the target vector.

unsafeCopy Source #

Arguments

:: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) 
=> MVector (Region m) ty a

target

-> MVector (Region m) ty a

source

-> m () 

Copy a vector. The two vectors must have the same length and may not overlap. This is not checked.

unsafeMove Source #

Arguments

:: forall m (ty :: SEXPTYPE) a. (MonadR m, VECTOR (Region m) ty a) 
=> MVector (Region m) ty a

target

-> MVector (Region m) ty a

source

-> m () 

Move the contents of a vector. The two vectors must have the same length, but this is not checked.

If the vectors do not overlap, then this is equivalent to unsafeCopy. Otherwise, the copying is performed as if the source vector were copied to a temporary vector and then the temporary vector was copied to the target vector.