comparison PDAUG_Merge_Dataframes/test-data/.ipynb_checkpoints/Untitled1-checkpoint.ipynb @ 0:7557b48b2872 draft

"planemo upload for repository https://github.com/jaidevjoshi83/pdaug commit a9bd83f6a1afa6338cb6e4358b63ebff5bed155e"
author jay
date Wed, 28 Oct 2020 02:10:12 +0000
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:7557b48b2872
1 {
2 "cells": [
3 {
4 "cell_type": "code",
5 "execution_count": 42,
6 "metadata": {},
7 "outputs": [
8 {
9 "name": "stderr",
10 "output_type": "stream",
11 "text": [
12 "Warning message in read.table(file = file, header = header, sep = sep, quote = quote, :\n",
13 "“incomplete final line found by readTableHeader on '/Users/joshij/Desktop/GitRepos/Peptide/align/New.csv'”\n"
14 ]
15 },
16 {
17 "ename": "ERROR",
18 "evalue": "Error in data[[rowvar]]: attempt to select less than one element in get1index\n",
19 "output_type": "error",
20 "traceback": [
21 "Error in data[[rowvar]]: attempt to select less than one element in get1index\nTraceback:\n",
22 "1. read.csv(\"/Users/joshij/Desktop/GitRepos/Peptide/align/New.csv\", \n . sep = \",\", header = TRUE, row.names = \"index\")",
23 "2. read.table(file = file, header = header, sep = sep, quote = quote, \n . dec = dec, fill = fill, comment.char = comment.char, ...)"
24 ]
25 }
26 ],
27 "source": [
28 "m <- read.csv(\"/Users/joshij/Desktop/GitRepos/Peptide/align/New.csv\", sep=\",\",header=TRUE, row.names='index')\n",
29 "\n",
30 "\n",
31 "m <- as.matrix(read.table(\"/Users/joshij/Desktop/GitRepos/Peptide/align/New.csv\", sep=\",\", header=TRUE, row.names='index')[, 1:4])"
32 ]
33 },
34 {
35 "cell_type": "code",
36 "execution_count": 38,
37 "metadata": {},
38 "outputs": [],
39 "source": [
40 "library(igraph)"
41 ]
42 },
43 {
44 "cell_type": "code",
45 "execution_count": 40,
46 "metadata": {},
47 "outputs": [
48 {
49 "ename": "ERROR",
50 "evalue": "Error in mde(x): 'list' object cannot be coerced to type 'double'\n",
51 "output_type": "error",
52 "traceback": [
53 "Error in mde(x): 'list' object cannot be coerced to type 'double'\nTraceback:\n",
54 "1. graph.adjacency(m, mode = \"undirected\", weighted = TRUE)",
55 "2. graph.adjacency.dense(adjmatrix, mode = mode, weighted = weighted, \n . diag = diag)",
56 "3. `mode<-`(`*tmp*`, value = \"double\")"
57 ]
58 }
59 ],
60 "source": [
61 "m <- as.matrix(read.table(\"out_1.csv\", sep=\",\", header=TRUE, row.names='index')[, 1:4])"
62 ]
63 },
64 {
65 "cell_type": "code",
66 "execution_count": null,
67 "metadata": {},
68 "outputs": [],
69 "source": []
70 }
71 ],
72 "metadata": {
73 "kernelspec": {
74 "display_name": "R",
75 "language": "R",
76 "name": "ir"
77 },
78 "language_info": {
79 "codemirror_mode": "r",
80 "file_extension": ".r",
81 "mimetype": "text/x-r-source",
82 "name": "R",
83 "pygments_lexer": "r",
84 "version": "4.0.0"
85 }
86 },
87 "nbformat": 4,
88 "nbformat_minor": 2
89 }