segment.popen {scbursts}

Calculate empirical P(Open) of a segment. (A state is considered open if the conductance is non-zero)

Description

Calculate empirical P(Open) of a segment. NOTE: Assuming that burst starts and ends with 1

Usage

segment.popen(segment)

Arguments

segment

The dwells and states table

Value

The ratio of open time to total time

Examples

# It's more likely that you created states or dwells with some function
states  <-  c(0,      1,    0,    1,    0,    1,    0,    1,    0,    1)
dwells  <-  c(0.1,  1.1,  0.5,  0.2,  1.0,  1.1,  0.6,  1.1,  0.8,  1.1)
my_burst <- segment.create(states, dwells, seg=1, start_time=3.14159, name="example_segment")

# P(Open) of this burst
segment.popen(my_burst)