所以我平均来说这部分不起作用...
d3.json("/miserables.json")
.then((graph) => {
var zoom = d3.zoom().on("zoom", zoomed).scaleExtent([1 / 10, 30]);
var rect = svg.append( "rect" )
var g = svg.append( "g" );
var zz = graph.nodes.map( function ( n ) { return n.value } );
var max = d3.max( zz );
var scale = d3.scaleLinear().domain( [0, max] ).range( [5, 50] );
var zz1 = graph.links.map( function ( n ) { return n.value } );
var max1 = d3.max( zz1 );
var scale1 = d3.scaleLinear().domain( [0, max1] ).range( [0, 50] );
for ( var xx in graph.links )
{
xx.value = scale1( xx.value );
}
var link = g
.attr("class", "links")
.selectAll("line")
.data(graph.links)
var node = g
.attr("class", "nodes")
.selectAll("circle")
.data(graph.nodes)
.enter().append("circle")
.attr( "r", function ( d ) { return scale( d.value ); } )
.attr("cx", function (d, i) { return d.x })
.attr("cy", function (d, i) { return d.y })
.attr("fill", function(d) { return color(d.group); })
.on("click", function(d){
self.emitter.fire(consts.EVENT_SHOW_NODE_INFO, self.component, {_id : d.id});
});
rect
.attr( "width", width )
.attr( "height", height )
.style( "fill", "none" )
.style( "pointer-events", "all" )
.call(zoom)
.call(zoom.transform, d3.zoomIdentity.translate(400, 200).scale(0.1));
node.append("title")
.text(function(d) { var arr = d.id.split(":"); let t = arr[arr.length-1]; return t; });
simulation
.nodes(graph.nodes)
.on("tick", ticked);
simulation.force("link")
.links(graph.links);
function zoomed()
{
if ( g ) {
g.attr( "transform", d3.event.transform );
}
}
function ticked() {
link
.attr("x1", function(d) { return d.source.x; })
.attr("y1", function(d) { return d.source.y; })
.attr("x2", function(d) { return d.target.x; })
.attr("y2", function(d) { return d.target.y; });
node
.attr("cx", function(d) { return d.x; })
.attr("cy", function(d) { return d.y; });
}
})
.catch((err) => {
console.log(err);
});
我有最大的工作量,但没有最低限度的代码,因此我不知道如何解决。
For Each s As String In IO.File.ReadAllLines("textfileishere")
Dim testScore As Integer
Dim count As Integer = s.Count
If Integer.TryParse(s, testScore) Then
averageWeight = s.Count / s
End If
Next
AverageKgTextBox.Text = averageWeight.ToString
同样,所有这些都必须从文本文件中读取并给出输出,我想以最简单的方式对此进行编码。
答案 0 :(得分:2)
用于平均计算:
我不会给出完整的答案,但是您应该首先增加总和并在“ for each”循环中计数,然后在循环外部计算平均值。在执行s.Count
时,您正在计算字符串中的字符,这不是您想要的。
用于最小计算:
最低的权重被初始化为零,因此,如果您的测试成绩为正,则最小值将始终为0。用一个非常高的值初始化它,如下所示:
Dim lowestWeight As Integer = Integer.MaxValue
两种情况下的提示:使用调试器逐步执行代码。您将看到代码的行为,以及代码是否按预期运行。
答案 1 :(得分:1)
总之如此简单:
If TextBox1.Text = "" Or (TextBox2.Text) = "" Then
MessageBox.Show("Please enter number.")
Else
Dim sum As Integer = 0
sum = Val(TextBox1.Text) + Val(TextBox2.Text)
MessageBox.Show("the sum is: " & sum)
End If
End Sub