24 #if defined (HAVE_CONFIG_H)
54 size_t pos = s.find_last_not_of (
' ');
56 s = (pos == std::string::npos) ?
"" : s.substr (0, pos+1);
67 size_t n = lst.size ();
75 for (
const auto&
str : lst)
112 size_t pos = s.find_last_not_of (
' ');
114 s = (pos == std::string::npos) ?
"" : s.substr (0, pos+1);
131 if (!
elem(
i).is_string ())
198 for (k = 0; k < n; k++)
199 iv(k) = idx_arg(k).index_vector ();
235 ra_idx(
i) = idx_arg(
i).index_vector ();
259 ra_idx.
xelem (
i) = idx_arg(
i).index_vector ();
289 error (
"Cell::column: requires 2-D cell array");
292 error (
"invalid column selection");
307 return insert (rb, ra_idx);
333 r[
i] = ((p++)->*
fcn) ();
octave_idx_type nnz(void) const
octave_value resize_fill_value(void) const
const octave_base_value const Array< octave_idx_type > & ra_idx
OCTAVE_EXPORT octave_value_list isa nd deftypefn *return ovl(args(0).is_integer_type())
octave_idx_type numel(void) const
Number of elements in the array.
void set_pos_if_unset(octave_idx_type nd_arg, octave_idx_type dim_arg)
void delete_elements(const idx_vector &i)
Deleting elements.
octave_idx_type length(void) const
void assign(const octave_value_list &idx, const Cell &rhs, const octave_value &fill_val=Matrix())
void error(const char *fmt,...)
Array< T > diag(octave_idx_type k=0) const
Get the kth super or subdiagonal.
octave_value & elem(octave_idx_type n)
Cell map(ctype_mapper) const
octave_idx_type rows(void) const
Array< T > & insert(const Array< T > &a, const Array< octave_idx_type > &idx)
Insert an array into another at a specified position.
calling an anonymous function involves an overhead quite comparable to the overhead of an m file function Passing a handle to a built in function is because the interpreter is not involved in the internal loop For a
const dim_vector & dims(void) const
Return a const-reference so that dims ()(i) works efficiently.
Array< std::string > cellstr_value(void) const
std::string string_value(bool force=false) const
nd deftypefn *octave_map m
const T * data(void) const
void resize(const dim_vector &dv, const octave_value &rfv)
Cell concat(const Cell &rb, const Array< octave_idx_type > &ra_idx)
bool is_cellstr(void) const
Cell & insert(const Cell &a, octave_idx_type r, octave_idx_type c)
the sparsity preserving column transformation such that that defines the pivoting threshold can be given in which case it defines the c
the exceeded dimensions are set to if fewer subscripts than dimensions are the exceeding dimensions are merged into the final requested dimension For consider the following dims
void err_wrong_type_arg(const char *name, const char *s)
T & xelem(octave_idx_type n)
N Dimensional Array with copy-on-write semantics.
void delete_elements(const octave_value_list &idx)
=val(i)}if ode{val(i)}occurs in table i
Cell column(octave_idx_type i) const
Cell index(const octave_value_list &idx, bool resize_ok=false) const
void set_pos(octave_idx_type nd_arg, octave_idx_type dim_arg)
void assign(const idx_vector &i, const Array< T > &rhs, const T &rfv)
Indexed assignment (always with resize & fill).
const octave_value * fortran_vec(void) const
octave_idx_type cols(void) const
Vector representing the dimensions (size) of an Array.
Cell diag(octave_idx_type k=0) const
If this string is the system will ring the terminal sometimes it is useful to be able to print the original representation of the string
Array< T > index(const idx_vector &i) const
Indexing without resizing.
return octave_value(v1.char_array_value().concat(v2.char_array_value(), ra_idx),((a1.is_sq_string()||a2.is_sq_string())? '\'': '"'))