<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE rflow [
<!ENTITY lt "&#38;#60;">
<!ENTITY gt "&#62;">
<!ENTITY amp "&#38;#38;">
<!ENTITY apos "&#39;">
<!ENTITY quot "&#34;">
]>
<rflow>
	<graph version="0.9" width="929" height="335" locationtype="a" offsetx="70" offsety="60">
		<setting>
			<entry key="USE_GRID">true</entry>
			<entry key="FOLDER">Task</entry>
			<entry key="GRID_DISTANCE2">10</entry>
		</setting>
<properties>
<v key="packages"/>
</properties>
		<node id="0" date="1449226608827" uid="23f65cf50fe15c0d" x="40" y="120">
			<command>data(iris)
</command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.ui.UINodeModel">
<ui cls="com.ef_prime.rflow.core.app.r.RSampleData" version="0.0.0">
<v key="data">iris</v>
<v key="package"/>
</ui>
			</option>
		</node>
		<node id="1" date="1449226608822" uid="3552f8ef6e6272b6" x="130" y="120">
			<command>pc &lt;- prcomp(iris[, 1:4])
</command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.base.FreeNodeModel"/>
		</node>
		<node id="2" date="1449226117808" uid="a791d75e450d3629" x="-50" y="270">
			<command></command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.base.CommentNodeModel">
				<entry key="state">opened</entry>
				<entry key="comment">To create a new link right-click on a node and select &quot;Create Link&quot;.
Try to create a link to &quot;Histogram&quot; node above.</entry>
			</option>
		</node>
		<node id="3" date="1449226117807" uid="7cae1e794248da2" x="-50" y="-40">
			<command></command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.base.CommentNodeModel">
				<entry key="state">opened</entry>
				<entry key="comment">You can create a &quot;Link&quot; of a node for easy access.
Links can be executed by &quot;Link&quot; tab at the upper-left side.
You can group multiple links to execute them at once.</entry>
			</option>
		</node>
		<node id="4" date="1449226608814" uid="fa006820655e99fe" x="220" y="190">
			<command># Draw Tree
plot(model, margin = 0.2, branch = 0.3)
text(model, fancy = T, all = T, use.n = T)</command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.base.FreeNodeModel"/>
		</node>
		<node id="5" date="1449226608849" uid="2aca974399bfa7f3" x="220" y="120">
			<command>biplot(pc)
</command>
			<packages/>
			<property/>
			<option type="com.ef_prime.rflow.node.base.FreeNodeModel"/>
		</node>
		<node id="6" date="1449226608844" uid="4c2facc878abf3b9" x="130" y="190">
			<command>model &lt;- rpart::rpart(formula = Species ~ ., data = iris)
</command>
			<packages>
				<package name="rpart" attach="false"/>
			</packages>
			<property/>
			<option type="com.ef_prime.rflow.node.ui.UINodeModel">
<ui cls="com.ef_prime.rflow.core.app.r.RModeling" version="0.5.2.0">
<v key="interface">single</v>
<v key="data">iris</v>
<v key="_output">model</v>
<v key="_output@auto">false</v>
<v key="formula">UI</v>
<v key="formula_text"/>
<v key="formula_object"/>
<v key="formula_y">Species</v>
<v key="formula_x">all</v>
<v key="formula_list"/>
<v key="formula_intercept">true</v>
<v key="models"/>
<v key="method">rpart</v>
<v key="family">binomial</v>
<v key="exclude_intercept">false</v>
<v key="include_interaction">false</v>
<v key="stepwise">false</v>
<v key="stepwise_direction">backward</v>
<v key="lower">false</v>
<v key="lower_formula">UI</v>
<v key="lower_x"/>
<v key="lower_formula_object"/>
<v key="lower_formula_text"/>
<v key="rpart_method"/>
<v key="rpart_auto_pruning">false</v>
<v key="rpart_cp"/>
<v key="rpart_xval"/>
<v key="rpart_minsplit"/>
<v key="rpart_minbucket"/>
<v key="rpart_maxdepth"/>
<v key="nnet_size">3</v>
<v key="nnet_decay"/>
<v key="nnet_maxit"/>
<v key="ranger_mtry"/>
<v key="ranger_num_trees"/>
<v key="ranger_min_node_size"/>
<v key="ranger_importance">"impurity"</v>
<v key="ranger_auto_prob">true</v>
<v key="ranger_classify_binary">true</v>
<v key="xgboost_cv">true</v>
<v key="xgboost_cv_nfolds">5</v>
<v key="xgboost_cv_maxit">50</v>
<v key="xgboost_cv_early_stop">5</v>
<v key="xgboost_nrounds">5</v>
<v key="xgboost_importance">true</v>
<v key="xgboost_max_depth"/>
<v key="xgboost_eta"/>
<v key="glmnet_family"/>
<v key="glmnet_type">grid_search</v>
<v key="append">false</v>
<v key="skip_error">false</v>
<v key="subset_type">include</v>
<v key="subset_logical">AND</v>
<v key="subset_conditions"/>
<v key="weights"/>
<v key="exclude_weight">false</v>
<v key="args_switch">rpart::rpart</v>
<v key="args_lm"/>
<v key="eval">false</v>
<v key="test_data"/>
<v key="eval_output">.eval</v>
<v key="eval_output@auto">true</v>
<v key="eval_type">numeric</v>
<v key="eval_type_auto">true</v>
<v key="eval_sort_result">true</v>
<v key="eval_sort_column">Mean.Squared.Error</v>
<v key="eval_conf_matrix">false</v>
<v key="eval_chart">false</v>
<v key="args_glm"/>
<v key="args_multinom"/>
<v key="args_rpart"/>
<v key="args_rpart.control"/>
<v key="args_nnet"/>
<v key="args_ranger"/>
<v key="args_xgboost"/>
<v key="args_xgboost_cv"/>
<v key="args_glmnet"/>
<v key="args_cv.glmnet"/>
<v key="args_step"/>
</ui>
			</option>
		</node>
		<node id="7" date="1449226608838" uid="ed381269dfca2dd0" x="40" y="220">
			<command>print(lattice::histogram(x = ~ Sepal.Length | Species, data = iris, type = &quot;percent&quot;))
</command>
			<packages>
				<package name="lattice" attach="false"/>
			</packages>
			<property/>
			<option type="com.ef_prime.rflow.node.ui.UINodeModel">
<ui cls="com.ef_prime.rflow.core.app.r.RLatticeHistogram" version="0.1.0">
<v key="data">iris</v>
<v key="variable">Sepal.Length</v>
<v key="conditioning">Species</v>
<v key="nint"/>
<v key="type">"percent"</v>
<v key="main"/>
<v key="sub"/>
<v key="xlab"/>
<v key="xmin"/>
<v key="xmax"/>
<v key="ylab"/>
<v key="ymin"/>
<v key="ymax"/>
<v key="advanced"/>
<v key="subset_type">include</v>
<v key="subset_logical">AND</v>
<v key="subset_conditions"/>
</ui>
			</option>
		</node>
		<node id="8" date="1449226608831" uid="e63e6bd1ab7a9b5b" x="130" y="50">
			<command>iris.cor &lt;- cor(
	x = if(is.data.frame(iris)) iris[, sapply(iris, is.numeric), drop = FALSE] else iris, 
	use = &quot;everything&quot;, method = &quot;pearson&quot;)
</command>
			<packages/>
			<property title="Correlation"/>
			<option type="com.ef_prime.rflow.node.ui.UINodeModel">
<ui cls="com.ef_prime.rflow.core.app.r.RCorCov" version="0.0.0">
<v key="data">iris</v>
<v key="_output">iris.cor</v>
<v key="_output@auto">true</v>
<v key="type">cor</v>
<v key="method">"pearson"</v>
<v key="use">"everything"</v>
</ui>
			</option>
		</node>
		<edge from="0" to="1"/>
		<edge from="1" to="5"/>
		<edge from="0" to="7"/>
		<edge from="6" to="4"/>
		<edge from="0" to="8"/>
		<edge from="0" to="6"/>
	</graph>
	<task>
		<taskgroup>
			<taskproperty/>
			<taskgroup>
				<taskproperty>
					<entry key="comment"></entry>
					<entry key="title">Multivariate Analysis</entry>
				</taskproperty>
				<taskentry node="5">
					<taskproperty>
						<entry key="comment"></entry>
						<entry key="title">Principal Components</entry>
					</taskproperty>
				</taskentry>
				<taskentry node="4">
					<taskproperty>
						<entry key="comment"></entry>
						<entry key="title">Decision Trees</entry>
					</taskproperty>
				</taskentry>
			</taskgroup>
			<taskentry node="8">
				<taskproperty>
					<entry key="title">Correlation</entry>
				</taskproperty>
			</taskentry>
		</taskgroup>
	</task>
</rflow>
